Обработка файловых структур данных

Файловые процедуры и функции
Назначение:
организовать доступ к файлам,
осуществить ввод –

файловые переменные
Для связи Паскаль – программы с внешними устройствами используют файловые

Операторы

Связь осуществляется оператором:
ASSIGN (имя файловой переменной,
' имя устройства');
Например:
assign (f,

Операторы

Для работы с файлом его необходимо открыть, по окончании работы –

Чтение и запись данных
Чтение и запись данных осуществляется известными процедурами read/write,

Операторы

Команда
RESET (f)
устанавливает указатель маркера файла на нулевое состояние, например,

Задание
Создание файла
Обработка файла

Пример 1. Создание файла

Создать файл, содержащий сведения о студентах
Структура записи

Пример 2. Обработка файла
Написать программу определения списка студентов определенного курса с

Создание файла

Определим поля записи:

Алгоритм создания файла

Для получения текущей записи организуем в программе запрос на

Алгоритм создания файла

Для подсчета количества записей в файле введем счетчик К,

Схема алгоритма

Текст программы 1

PROGRAM MY_FILE;
{Алексеев А., 12-ВИЭ-1, вариант 7}
{Подключение модуля CRT}
USES

Текст программы 1

{Создание файла}
WRITELN ('Для ввода данных нажмите Enter');
WRITELN ('Для окончания

Текст программы 1

CLRSCR;
WRITELN ('B файле ',K:5,' записей');
{Файл открывается для чтения}
RESET (spisok);
{Вывод

Алгоритм обработки файла

Для выполнения задания необходимо:
в основной программе ввести с терминала

Алгоритм обработки файла

В подпрограмме:
организовать в цикле чтение текущей записи файла
проверить совпадение

POISK

N=0

Открытие файла для чтения

Not eof spisok

чтение записи Y

Y.kurs=KS

N=N+1, SPST[N]=Y

К

Схема
алгоритма

Закрытие файла

Текст программы обработки

Program Spisok_stud;
{Алексеев А., 15-ЗИЭ-1, вариант 8}
Uses Crt;
TYPE
ZAP=RECORD
INDEX:

Procedure POISK(KS: Byte; Var N: Integer; Var SPST: Mas);
Var
spisok: