Текстовые файлы состоят из символов. Каждый текстовый файл разделяется на строки неопределенной длины, которые заканчиваются символом конец строки. Весь файл заканчивается символом конец файла.
К текстовым файлам возможен только последовательный доступ. С текстовыми файлами работают различные редакторы текстов. Текстовые файлы имеют стандартный тип TEXT.
VAR <имя файла>: TEXT;
Посимвольные операции ввода-вывода выполняются для текстовых файлов процедурами readиwrite.Строки обрабатываются специальными процедурами для текстовых файлов readlnиwriteln.Кроме того, для текстовых файлов применяются процедуры ASSIGN, RESET, REWRITE, CLOSE, EOF, eoln.Процедураappendоткрывает существующий текстовый файл для добавления записей. Для текстовых файлов нельзя использовать процедуры и функции SEEK, FILEPOS, FILESIZE,т.к. элементы имеют разную длину.
inputи outputстандартные текстовые файлы для ввода с клавиатуры и вывода на экран.
Рассмотрим программу, реализующую следующую задачу. Дан текстовый файл F1.Необходимо заменить во всех записях этого файла код группы ДС-101 на ДС-201. Скорректированные записи поместить в файл F2.
var f1,f2: text;
pole:string;
name:string[12];
pz: integer;
begin write(‘ввод имени входного файла:’);