Алгоритмические языки и программирование. Аксенова Л.И - 21 стр.

   Процедура SEEK (<файловая переменная>,<№ компонента>) -
смещает указатель файла к компоненту с заданным номером.
   Здесь № компонента - выражение типа LONGINT.
   Функция FILESIZE(<файловая переменная>) - возвращает значение
типа LONGINT, которое содержит количество компонентов файла.
   Функция FILEPOS(<файловая переменная>) - возвращает значение
типа LONGINT, которое содержит порядковый номер компонента файла,
который будет обрабатываться последующей операцией ввода-вывода.
   Преимущество типизированных файлов: эффективный способ хранения
информации и упрощение операций ввода-вывода. Так, например, при вводе
структур данных не нужно указывать каждое поле, как это требовалось при
работе с текстовыми файлами.
   К недостаткам можно отнести невозможность просмотра содержимого
типизированного файла и его изменения каким-либо редактором, так как
числовые данные записываются в двоичном коде.
   Создать типизированный файл можно программным способом.

              Пример работы с типизированными файлами

                     Создание типизированного файла

   Пусть дан текстовый файл, содержащий несколько записей, структура
которых представлена в табл. 1(см. лабораторную работу №1)
   Необходимо сформировать типизированный файл той же структуры.

                             ОПИСАНИЕ ПРОГРАММЫ

Uses crt;
Type tzap=record          { Описания типа для структуры }
       nom : word;
       fio : string[30];
       godr : 1900..2000;
       end;
Var
 f_out : file of tzap; { Файловая переменная для типизированного файла}



                                    21