ТЕКСТОВЫЕ ФАЙЛЫ Turbo Pascal 7.0

Операции с текстовыми файлами Выделение буфера обмена Установка связи Открытие файла Чтение из файла Запись в файл Закрытие файла Конец файла

Выделение буфера обмена Var fp: text; Буфер обмена (указатель на файл, файловая переменная)

Установка связи между буфером обмена и файлом Assign(fp, name) Буфер обмена Имя файла (путь к файлу + имя файла)

Открытие файла Reset(fp) Запись в файл ReWrite(fp) Append(fp) Чтение из файла Добавление в конец файла

Чтение из файла символов Readln(fp, St) Чтение из файла текущей строки Read(fp, St) Чтение из файла очередного символа

Чтение из файла чисел Read(fp, x) Чтение из файла очередного числа

Запись в файл символов Writeln(fp, St) Запись строки в файл Write(fp, St) Запись символов в текущую строку файла

Запись в файл чисел Write(fp, x, ' ') Запись чисел в строку Writeln(fp, x) Запись чисел в столбец

Закрытие файла Close(fp) Обязательная команда!

Определение конца файла Eof (fp) True - конец файла False - файл не кончился Функция Тип: Boolean

Чтение из файла чисел Assign(fp, 'Input.txt'); Reset(fp); i:=0; While Not Eof(fp) do begin i:=i+1; Read(fp, x[i]); end; Close(fp);