программа шифрования текстовых файлов Опции

[snejinka]

Разработать программу шифрования текстовых файлов. Программа должна выполнить следующие действия: организовать построчное чтение данных из файла, уменьшить на 5 код каждой согласной буквы строки, записать зашифрованную строку в выходной файл. Предоставить возможность просмотра исходного и закодированного файлов. Каждое действие оформляется как подпрограмма. Главная программа реализует только диалоговый цикл взаимодействия с пользователем.
Не понимаю особенно как организовать построчное чтение данных из файла... Заранее спасибо!

[sheka]

readln(file, stringg);

[Lapp]

Немного дополню, что сказал sheka.

const
  Consonant= ['b','c','d','f','g','h','k','l','m','n','p','q','r','s','t','v','w','x','z'];
  Shift= 5;
...

while not EoF(f) do begin
  ReadLn(f,s);
  for i:=1 to Length(s) do if s[i] in Consonant then Dec(s[i],Shift);
  WriteLn(g,s)
end;

Набор согласных проверь, мог ошибиться )).

[snejinka]

окей=) всё норм, спасибо!