Введение файлового типа  в  язык  ПАСКАЛЬ  вызвано  необходимостью

обеспечить возможность работы с периферийными (внешними) устройствами

ЭВМ, предназначенными для ввода, вывода и хранения данных.

   Файловый тип данных или файл определяет упорядоченную совокупность

произвольного числа однотипных компонент.

   Общее свойство массива,  множества и записи заключается в том, что

количество их компонент определено на этапе написания программы, тог-

да как  количество компонент файла в тексте программы не определяется

и может быть произвольным.

   Понятие файла  достаточно  широко.  Это может быть обычный файл на

диске, коммуникационный порт ЭВМ,  устройство печати,  клавиатура или

другие устройства.

   При работе с файлами выполняются операции ввода - вывода. Операция

ввода означает   перепись  данных  с внешнего устройства (из входного

файла) в  основную память ЭВМ, операция вывода - это пересылка данных

из основной памяти на внешнее устройство (в выходной файл).

   Файлы на внешних устройствах часто называют  физическими  файлами.

Их имена  определяются  операционной системой.  В программах на языке

Паскаль имена файлов задаются с помощью строк. Например, имя файла на

диске может иметь вид:

   'A:LAB1.DAT'

   'c:\ABC150\pr.pas'

   'lab3.pas'.

   Операционная система  MS-DOS не делает особого различия между фай-

лами на дисках и лентах и устройствами ЭВМ и портами коммуникаций.  В

TURBO PASCAL  могут использоваться имена устройств и портов,  опреде-

ленные в MS-DOS, например:

   'CON',  'LPT1',  'PRN',  'COM1',  'AUX',  'NUL'.

   С файловой системой TURBO PASCAL связано понятие  буфера  ввода  -

вывода. Ввод  и вывод данных осуществляется через буфер.  Буфер - это

область в памяти,  которая выделяется для каждого файла. При записи в

файл вся  информация сначала направляется в буфер и там накапливается

до тех пор,  пока весь объем буфера не будет заполнен.  Только  после

этого или после специальной команды сброса происходит передача данных

на внешнее устройство. При чтении из файла данные вначале считываются

в буфер, причем данных считывается не столько, сколько запрашивается,

а сколько поместится в буфер.

   Механизм буферизации  позволяет  более быстро и эффективно обмени-

ваться информацией с внешними устройствами.

   Для работы  с  файлами  в программе необходимо определить файловую

переменную. TURBO  PASCAL поддерживает три файловых типа:   текстовые

файлы, компонентные файлы, бестиповые файлы.

   Описание файловых переменных текстового типа  производится  с  по-

мощью служебного слова Text, например:

   var tStory: Text;

   Описание компонентных файлов имеет вид:

   var fComp: File of T;

где T  -  тип  компоненты файла. Примеры описания файловой переменной

компонентного типа:

   type M= array[1..500] of Longint;

   var f1: File of Real;

       f2: File of Integer;

       fLi: File of M;

   Бестиповые файлы описываются с помощью служебного слова File:

   var f: File;

   Файловые переменные,  которые описаны в программе,  называют логи-

ческими файлами.    Все основные процедуры и функции,  обеспечивающие

ввод - вывод данных,  работают только с логическими файлами. Физичес-

кий файл  должен быть связан с логическим до выполнения процедур отк-

рытия файлов.

   TURBO PASCAL вводит ряд процедур и функций,  применимых для  любых

типов файлов:  Assign,  Reset,  Rewrite,  Close,  Rename, Erase, Eof,

IOResult.

   Процедура Assign(  var  f; FileName: String ) связывает логический

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

FileName.

   Процедура Reset( var f ) открывает логический файл f для последую-

щего чтения данных или,  как говорят,  открывает входной файл.  После

успешного выполнения процедуры Reset файл готов к чтению из него пер-

вого элемента.

   Процедура Rewrite( var f )  открывает логический файл f для после-

дующей записи  данных (открывает выходной файл).  После успешного вы-

полнения этой процедуры файл готов к записи в него первого  элемента.

   Процедура Close( var  f )  закрывает  открытый до этого логический

файл. Вызов процедуры Close необходим при завершении работы с файлом.

Если  по  какой-то  причине  процедура Close не будет выполнена, файл

все-же  будет создан на внешнем устройстве,  но содержимое последнего

буфера в него  не будет перенесено.  Для входных файлов использование

оператора закрытия файла необязательно.

   Логическая функция EOF( var f ): Boolean возвращает значение TRUE,

когда при чтении достигнут конец файла.  Это означает, что уже прочи-

тан последний элемент в файле или файл после открытия оказался пуст.

   Процедура Rename( var f; NewName: String ) позволяет переименовать

физический файл на диске, связанный с логическим файлом f. Переимено-

вание возможно после закрытия файла.

   Процедура Erase( var f )  уничтожает физический файл на диске, ко-

торый был связан с файловой переменной f.  Файл к моменту вызова про-

цедуры Erase должен быть закрыт.

   Функция  IOResult: Integer возвращает целое число, соответствующее

коду последней ошибки ввода - вывода.  При нормальном завершении опе-

рации функция вернет значение 0. Значение функции IOResult необходимо

присваивать какой - либо переменной,  так как при каждом вызове функ-

ция обнуляет свое значение. Функция IOResult работает только при вык-

люченном режиме проверок ошибок ввода - вывода или с ключом  компиля-

ции {$I-}.