Зауваження: операції writeln (f) і readln (f) застосовні тільки до текстових файлів.
Файли записів
Опис:
Тип змінної може бути визначений як файловий безпосередньо в розділі змінних
var f = file of student;
Довжина файлів в описах не визначена, але кожний файл має кінець, називаний ознакою кінця файлу. Ця ознака формується операційною системою автоматично після закриття файлу (при цьому розмір файлу кратний 1 блоку = 512 байт) і може бути пізнаний за допомогою визначеної функції EOF (ім'я файлу), що у цьому випадку прийме щире значення. Ознака кінця файлу може бути сформований і самим програмістом.
Ознака кінця файлу зручний для організації циклів по обробці даних з файлу:
i:= 0;
while not (eof (f)) do
begin
read (f, st);
if st. fio = ' Іванов ' then inc (i);
end;
writeln (' У даному файлі зберігатися інформація про ', i, ' Іванових ');
Для роботи з файлом записів його необхідно “відкрити” на фізичному носії інформації, cвязав “логічне” і “фізичне” імена файлів між собою (див. процедуру assign).
Тепер файл “ відкритий” і, отже, його можна заповнити деякої інформацією, що цікавить нас. Це можна зробити двома способами: або переписавши необхідну інформацію з іншого, уже існуючого файлу (можливо текстового); або заповнивши інформацією, отриманої від користувача в режимі діалогу.
Після запису інформації у файл його необхідно “закрити” за допомогою оператора CLOSE(F). Тепер файл готовий для наступної роботи й зберігання інформації.
ПОРЯДОК ВИКОНАННЯ РОБОТИ:
ЗАВДАНЯ № 1 Складання, введення в ПЕОМ та налагодження програми з використанням текстових файлів
ЗАВДАННЯ № 2 . Складання, введення в ПЕОМ та налагодження програми з використанням типізованих файлів записів
ЗАВДАННЯ № 3 Складання, введення в ПЕОМ та налагодження програми з використанням меню
ПРИКЛАДИ ВИКОНАННЯ ЗАВДАННЯ