Інструкції виведення в файл
До цього моменту наші програми результат своєї роботи видавали на екран. Це не завжди зручно. Мова Паскаль дозволяє зберегти результати роботи програми у файлі на диску комп'ютера.
Файл. з точки зору програми на мові Паскаль, ¾ це іменована структура даних, що представляє собою послідовність елементів одного типу. Кількість елементів файлу практично не обмежена. У першому наближенні файл можна розглядати як масив змінної довжини необмеженого розміру.
Ім'я. file of Тип Елементів
Приклади: f. file of Integer <файл целых чисел> ;
Файл, копонентамі якого є дані символьного типу (CHAR), називається текстовим. Опис FILE OF CHAR може бути замінено на TEXT, т. Е. Опис rez. file of char еквівалентно опису rez. text.
assign (var f. text; Ім'я файлу. string);
Ім'я файлу задається згідно з прийнятими в MS-DOS правилам. Воно може бути повним, тобто складатися не тільки безпосередньо з імені файлу, але і включати шлях до файлу.
assign (f. 'a: \ resultat.txt');
assign (f, 'e: \ students \ ivanov \ kof.dat');
Безпосередньо висновок в текстовий файл здійснюється за допомогою інструкції WRITE або WRITELN. у якій список виведених значень починається зі змінною типу TEXT. ідентифікує файл для виводу. Наприклад, якщо змінна f має тип TEXT, то інструкція виведення в файл може бути такою:
write (f. 'Коріння рівняння', x1, x2);
Однак для того щоб інструкція WRITE вивела дані в файл, мало призначити ім'я файлової змінної. Потрібно ще відкрити файл для виводу.
Перед виведенням в файл необхідно відкрити файл. Якщо програма, яка формує вихідний файл, вже використовувалася, то можливо, що файл з результатами роботи програми вже є на диску. Тому програміст повинен вирішити, як вчинити зі старим файлом. Це визначається під час відкриття файлу.
Можливі такі режими (варіанти) відкриття файлу для запису в нього даних:
* Перезапис (запис нового файлу поверх існуючого або створення нового файлу);
* Додавання в існуючий файл.
Щоб відкрити файл в режимі створення нового файлу або заміни існуючого, необхідно викликати процедуру REWRITE (f). гдеf ¾ файлова змінна типу TEXT.
Щоб відкрити файл в режимі додавання в існуючий файл, необхідно викликати процедуру APPEND (f). гдеf ¾ файлова змінна типу TEXT.
Наступна програма відкриває файл в режимі створення нового файлу і записує в нього 5 рядків.
assign (f, 'test.txt');
for i: = 1 to 5 do
writeln (f, 'Рядок'. i);