Форум программистов, компьютерный форум, киберфорум
Batch (CMD/BAT)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.85/13: Рейтинг темы: голосов - 13, средняя оценка - 4.85
-1 / 0 / 0
Регистрация: 27.10.2018
Сообщений: 15

Выдернуть из исходного файла все слова, поочередно помещая их в новый файл с новой строки

15.11.2018, 19:31. Показов 2977. Ответов 28

Студворк — интернет-сервис помощи студентам
выдернуть из исходного файла все слова поочередно помещая их в новый файл (вспомогательный) с новой строки
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
15.11.2018, 19:31
Ответы с готовыми решениями:

Строки исходного файла записать в новый файл, добавив знак ? после первого слова строки
Строки исходного файла записать в новый файл, добавив знак ? после первого слова строки

Дано целое число N и текстовый файл. Создать новый файл, содержащий все слова длины N из исходного файла
Помогите, пожалуйста, с задачей :sigh: Дано целое число N и текстовый файл. Создать новый файл, содержащий все слова длины N из исходного...

Переписать в новый файл все строки четной длины исходного файла
Дан текстовый файл. Переписать в новый файл все его строки четной длины. помогите пожалуйста

28
-1 / 0 / 0
Регистрация: 27.10.2018
Сообщений: 15
18.11.2018, 23:15  [ТС]
Студворк — интернет-сервис помощи студентам
FlasherX, volodin661, alpap, подскажите код для оболочки shell для linux ,опять же все слова из текста с новой строки
0
7690 / 2887 / 1110
Регистрация: 06.06.2017
Сообщений: 9,816
19.11.2018, 01:14
Ydzhin, ну, так давался ответ на Bash. Для вывода в файл достаточно дописать >NEWNAME.txt:
Bash
1
tr -cs [:alnum:] \n<Text.txt>Text_new.txt
Если tr.exe (из tr.7z) кинуть рядом (или в system32), будет и на cmd.
Можно обойтись простым vbs (<Name>.vbs <Name.ext>):
Visual Basic
1
2
3
4
5
6
F = WSH.Arguments(0)
Set FSO = CreateObject("Scripting.FileSystemObject")
With New RegExp .Pattern = "[А-я\w]+" : .Global = 1
Set W = .Execute(FSO.OpenTextFile(F).ReadAll) End With
Set NF = FSO.CreateTextFile(FSO.GetBaseName(F) & "_new" & "." & FSO.GetExtensionName(F), 1)
For i = 0 To W.Count - 1 : NF.WriteLine W(i) : Next : NF.Close
1
Любознательный
 Аватар для YuS_2
7407 / 2260 / 361
Регистрация: 10.03.2016
Сообщений: 5,216
19.11.2018, 07:33
Цитата Сообщение от volodin661 Посмотреть сообщение
powershell: слов много, но всё по делу
можно и поменьше слов, но больше дела
PowerShell
1
(gc test.txt -raw) -split '\W+'
2
-1 / 0 / 0
Регистрация: 27.10.2018
Сообщений: 15
19.11.2018, 15:31  [ТС]
alpap, FlasherX, volodin661, подскажите как соединить:
@echo off
<file.txt>new.txt (for /f "delims=" %%a in ('more') do @for %%s in (%%a) do @echo %%s)
pause и вот это If exist %1 (echo “file exist” && sort %1 > result.txt) else (echo “this file is not exit”)
0
7690 / 2887 / 1110
Регистрация: 06.06.2017
Сообщений: 9,816
19.11.2018, 17:21
Ydzhin, это как к сабжу-то относится? См. п. 5.16 правил.
0
Нарушитель
7168 / 2337 / 353
Регистрация: 10.12.2013
Сообщений: 8,093
19.11.2018, 18:36
Цитата Сообщение от YuS_2 Посмотреть сообщение
можно и поменьше слов, но больше дела

(gc test.txt -raw) -split '\W+'
От такого варианта я отказался, потому что вылезали лишние и абсолютно непобедимые переводы строк.
Но под Windows оказалось, что всё хорошо, то есть, эти артефакты только под MacOS. М-да.. плохи дела.

Добавлено через 7 минут
Нет, всё-таки я облажался. При опции -raw лишних переводов строк нет и под MacOS. И это хорошо.
0
-1 / 0 / 0
Регистрация: 27.10.2018
Сообщений: 15
20.11.2018, 11:48  [ТС]
alpap, FlasherX, volodin661,
Windows Batch file
1
2
3
@echo off
if exist %1 (echo "file exist" && %1 (for /f "delims=" %%a in ('more') do @for %%s in (%%a) do @echo %%s && sort new.txt > result.txt) > new.txt) else (echo "this file is not exit" )
pause
что тут не так?

Добавлено через 52 минуты
все я понерфил
0
-1 / 0 / 0
Регистрация: 27.10.2018
Сообщений: 15
24.11.2018, 19:01  [ТС]
volodin661, FlasherX, alpap, код на bash не работает
0
7690 / 2887 / 1110
Регистрация: 06.06.2017
Сообщений: 9,816
24.11.2018, 23:29
Ydzhin, я предложил два варианта (cmd/vbs) решения. А что там на Linux, логично спрашивать не здесь.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
24.11.2018, 23:29

Получить новый файл, в котором все слова во всех предложениях исходного файла, записаны в обратном порядке
1)На языке программирования Pascal реализовать процедуры работы со стеком на последовательном распределении памяти: - Создание пустого...

Создать новый строковый файл, содержащий все строки исходного файла наименьшей длины
Дан строковый файл. Создать новый строковый файл, содержащий все строки исходного файла наименьшей длины (в том же порядке). ...

Создать новый строковый файл, содержащий все строки исходного файла наибольшей длины
Дан строковый файл. Создать новый строковый файл, содержащий все строки исходного файла наибольшей длины (в обратном порядке). ...

Создать новый файл, содержащий все строки исходного файла наибольшей длины в обратном порядке
Дан текстовый файл. Создать новый файл, содержащий все строки исходного файла наибольшей длины в обратном порядке

Дан строковый файл. Создать новый строковый файл, содержащий все строки исходного файла наибольшей длины
Всем привет! Кто может помочь с двумя небольшими програмками по работе с файлами? Очень буду благодарен... 2)Дана строка S нулевое,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
29
Ответ Создать тему
Новые блоги и статьи
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть не большие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
Запрет дублирования строк в табличной части
Maks 13.09.2026
Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Jin X 06.09.2026
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
Программа опроса у.з. расходомера SLS-720F
Argus19 02.09.2026
Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .
Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0.
Maks 31.08.2026
При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .
Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм
anaschu 30.08.2026
Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .
Оттачиваю умение писать js программы.
russiannick 30.08.2026
Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru