Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Задача на файлы

Автор: Guest 1.04.2005 12:17

Задача: нужно переписать в новый файл первую из строк, содержащих наибольшее число слов
Подскажите пожалуйста!
Можно ли посчитать кол-во строк в файле, а затем в цикле считать сумму слов в каждой из строк или можно как-то попроще?

Автор: volvo 1.04.2005 12:26

Цитата(Guest @ 1.04.05 7:17)
Можно ли посчитать кол-во строк в файле, а затем в цикле считать сумму слов в каждой из строк или можно как-то попроще?

Можно и так, а можно и попроще:
1. Изначально счетчик макс. кол-ва слов присваиваем 0.
2. Читаем строку из файла.
3. Разбиваем ее на слова (здесь есть функция, которая возвращает число слов в строке: http://forum.pascal.net.ru/index.php?showtopic=2361&view=findpost&p=28157)
4. Если число слов текущей строки больше макс., то обновляем макс. число слов, и запоминаем саму строку.
5. Продолжаем, пока в файле есть строки.
6. Когда строки файла закончились - просто записываем во второй файл последнюю запомненную строку.