Pascal. Файлы

Файловые операции ввода - вывода осуществляются теми же процедурами, что и операции с консолью, но дополнительно в них указывается переменная файлового типа. Например,


var
  f : text;

Переменная f предназначена для работы с текстовыми файлами, то есть с файлом, состоящим из строк


var
  f : file of integer;

Переменная f предназначена для работы с файлом, состоящим из значений целого типа.

Прежде чем обратиться к файлу, необходимо ассоциировать переменную с файлом, находящимся на диске компьютера, что выполняет процедура Assign. Например:


  Assign(f, 'C:\PABCWork.NET\mytext.txt');

файловой переменной назначается имя, которое задается вместе с расположением файла на диске C.

Также необходимо открыть файл для чтения или записи процедурами  Reset и Rewrite соответственно, после окончания работы файл необходимо закрыть процедурой Close, иначе данные, записанные в файл, не сохранятся.

Для файлов доступна функция Eof, которая при чтении возвращает значение Истина, если достигнут конец файла. Для файла типа text может быть полезна функция Eoln, которая возвращает значение Истина, если достигнут конец строки.

Выведем в консоль текстовые строки из файла  C:\PABCWork.NET\mytext.txt:


var
  f : text;
  s :string;
begin
  Assign(f, 'C:\PABCWork.NET\mytext.txt');
  Reset(f);
  while not Eof(f) do begin
    Readln(f, s);
    Writeln(s);
  end;
  Close(f);
end.

 

Задачи для самостоятельного решения