Страница 1 из 1

Обработка текстового файла

Добавлено: 09 янв 2009, 17:20
RAITER
Сейчас решаю данную задачу:
Написать программу, которая считывает содержимое текстового файла и распечатывает его в формате, указанном пользователем. Пользователь должен иметь возможность определить максимальное число литер в строке, максимальное число строк на странице. Если логическая строка файла больше заданной длины печатной строки, то следует произвести усечение строки справа. Страницы должны быть пронумерованы в верхнем правом углу.
Не могли бы вы помочь мне, хотя бы набросать примерный алгоритм, а то на ум ничего не приходит, я даже не знаю что такое литеры((

Re: Обработка текстового файла

Добавлено: 10 янв 2009, 16:53
Хыиуду
i:=0;
s='';
len:=80; //Литер, а если не умничать, то символов в строке
lines_per_page:=40;// строк на странице
repeat
readln(f, s, len);
writeln(s);
inc(i);
if i mod lines_per_page=0 then
writeln(' ',i);
until eof(f);

Re: Обработка текстового файла

Добавлено: 10 янв 2009, 18:46
RAITER
Спасибо большое