опиши типы файловых переменных как TextFile, задай файлы через AssignFile, открой для чтения Reset, для записи Rewrite. в цикле до Eof читай строки ReadLn, добавляй в начало пробел, пиши WriteLn. в конце закрой файлы CloseFile. примеры по каждой процедуре есть в файле справки.
|