В качестве базового типа элементов файла может быть использован любой тип данных, кроме FILE.

Например,

Type Т=File Of Сhаr;

Var FT: T;

Здесь,

FT -имя файла;

T -имя типа (у нас оно символьного типа).

Значит,FT-имя файла символьных данных.

ПРИМЕЧАНИЕ.

1. Файлы символьных данных называются ещё текстовымифайлами.

2. Поэтому описание типа Сhаrэквивалентно описанию типа ТЕХТ.

Следовательно, файл с именем FTможно описать и так:

Var FT: TЕХТ;

3. Ещё раз подчеркнём, что в качестве базового типа элементов файла могут быть и INTEGER, и REAL, и MAS (массив) и т.д.

2. ( с объявлением файлов в разделе переменных ).

Здесь форма объявления такова:

Var <имя файла>: File Of <базовый тип>;

О базовом типе уже говорилось выше. Приведём несколько примеров объявления

файлов:

Var

F1: File of Real;

F2: File of Integer;

F3: File of Char; и т. д.

Здесь:

F1,F2,F3-имена файлов.

Стандартные процедуры для работы с файлами

Укажем основные стандартные процедуры, которые нужны для работы с файлами.

Assign(F,Str)Здесь происходит присвоение имени файла, содержащегося в строковом выражении Str,файловой переменной F.При этом файловой переменнойFзаранее присваивается тип ТЕХТ,а строковому выражению Str -тип String,т. е.

Var

F: TEXT;

Str: String;

1. Данные типа String соответствуют строке символов.

2. Строковые переменные должны быть описаны.Здесь возможны 2 варианта:

· с использованием TYPE;

· с использованием раздела описаний.

Вариант 1:

TYPE имя типа= String[N];

Var

Имя переменной: имя типа;

Вариант 2:

Var

Имя переменной: String[N];

Здесь N-целая константа, обозначающая количество символов в строке.

Например, в Турбо Паскале

1£N£255.

Readln(Str). Ввод и вывод строковых переменных осуществляется без кавычек. При этом для ввода надо использовать форму Readln(Str)вместо Read (Str);

Следующая стандартная процедура:

Reset(F).Осуществляет открытие файла F для чтения. Работает после указания процедуры Assign.

Rewrite(F).Cлужит для открытия нового файла F с целью записи в него информации. При этом предыдущие данные уничтожаются.

Write(F,Y[i]).Записывает (выводит) одно или более значений переменных в файл F.

Close(F).Закрывает файл F,открытый процедурами Reset или Rewrite.