Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лабораторные Паскаль.docx
Скачиваний:
0
Добавлен:
01.04.2025
Размер:
780.93 Кб
Скачать

2.3 Инициализация файла

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

Для чтения файл инициализируют с помощью стандартной процедуры reset, которая открывает существующий файл для чтения или изменения:

reset (<файловая переменная>);

Если с помощью этой процедуры открыт типизированный файл для чтения информации, то к этому файлу можно обратиться с процедурой write для записи информации в файл.

Стандартная процедура

rewrite (<файловая переменная>);

инициирует запись информации в файл или в логическое устройство, указанное как <файловая переменная>.

Процедурой rewrite нельзя инициировать запись информации в ранее существовавший дисковый файл, т.к. при выполнении этой процедуры старый файл уничтожается и никаких сообщений об этом в программу не поступает. Новый файл подготавливается к приёму информации и его указатель принимает значение 0.

Стандартная процедура

append (<файловая переменная>);

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

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

Если текстовый файл был открыт с помощью процедуры reset или rewrite, то применение к файлу процедуры append приведёт к закрытию этого файла и немедленного открытия вновь, но уже для добавления в него записей.

2.4 Процедуры и функции для работы с файлами

Ниже приведены некоторые процедуры и функции модуля System, которые применимы для работы с файлами.

Процедура close (<файловая переменная>) закрывает файл, сохраняя установленную ранее процедурой assign связь файловой переменной с именем файла.

Функции процедуры close выполняются автоматически по отношению ко всем открытым файлам при нормальном завершении программы. Так как связь файла с файловой переменной сохраняется, то файл можно повторно открыть без дополнительного использования процедуры assign.

Процедура rename (<ф.п.>, <новое имя>) переименовывает файл. Перед выполнением процедуры rename необходимо закрыть файл, который был открыт процедурами reset, rewrite или append.

Процедура erase (<файловая переменная>) уничтожает (стирает) файл, заданный как <файловая переменная>. Перед выполнением процедуры rename необходимо закрыть файл, который был открыт процедурами reset, rewrite или append.

Процедура BlockRead (var F: file; var buf; count: word [; var result: word]) считывает в переменную buf count записей из файла F. Необязательный параметр result содержит истинное количество считанных записей.

Процедура BlockWrite (var F: file; var buf; count: word [; var result: word]) передаёт count записей из переменной buf в файл F. Необязательный параметр result содержит истинное количество считанных записей.

3 Порядок выполнения работы

  1. Разработайте алгоритм решения задачи в соответствии со своим вариантом.

  2. Откройте текстовый редактор Turbo Pascal.

  3. Напишите программу решения задачи по разработанному ранее алгоритму. В программе предусмотреть вывод справочной информации (информация об авторе, наименование и назначение программы), возможность многократных вычислений.

  4. Отладьте программу.

  5. Сохраните результаты работы программы.