1. возраста учащихся школы;

2. температуру воздуха с точностью до сотых;

3. площади стран мира;

4. ASCII коды символов.

1. Сопоставление файловой переменной файлу на диске

На данном этапе происходит связывание файловой переменной с реальным файлом, находящимся на диске.

Связывание осуществляется процедурой Assign (от англ. Assign – назначать), имеющей следующий вид:

Assign (<Файловая переменная>, <Имя файла>);

В качестве Файловой переменной может быть любая переменная файлового типа, описанная в разделе описания переменной. В качестве Имени файла – строковое выражение (заключается в апострофы), содержащее имя файла, удовлетворяющее требованиям операционной системы.

Пример 2. Сопоставление файловой переменной файлу на диске

Program Files2;

Var

T: Text;	{описание файловой переменной с именем T для работы с текстовыми файлами}
Begin
Assign (T, ‘game.txt’);	{сопоставление файловой переменной T файлу с именем game.txt, находящемуся в текущем каталоге}

End.

Задание 2. Напишите часть программы, содержащую фрагмент сопоставления файловой переменной F файлу ishodnik.pas, находящемуся на диске А:\ в каталоге Reshenie.

Задание 3. Напишите часть программы, содержащую фрагмент сопоставления файловой переменной G файлу ishodnik.pas, находящемуся в каталоге Zadanie, расположенном в каталоге, содержащем программу.

Задание 4. Напишите часть программы, содержащую фрагмент сопоставления файловой переменной K файлу ishodnik.pas, находящемуся в том же каталоге, что и программа (в текущем каталоге).

3. Открытие файла

Каждый файл, которому сопоставлена файловая переменная, в любой момент времени выполнения программы может находиться в одном из трех состояний:

1. Файл закрыт: с ним нельзя выполнять никаких действий. Данный режим устанавливается для файла при сопоставлении ему файловой переменной.

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

3. Файл открыт для записи: для файла допустима операция добавления или изменения текущего элемента, на который указывает указатель текущего элемента.

4. Добавление информации в файл.

Открытие файла для чтения производится процедурой Reset (англ. Reset – сбросить) с одним параметром – файловой переменной, определяющей, какой именно файл следует открыть для чтения:

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

Открытие файла для записи производится процедурой Rewrite (англ. Rewrite – перезаписать) с одним параметром – файловой переменной, определяющей, какой именно файл следует открыть для записи:

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

Процедуры Reset и Rewrite требуют некоторого пояснения. Если файл открывается программой для чтения, то он должен существовать на диске, то есть файловая переменная должна содержать имя реально существующего файла. Если данное условие не выполняется, то при попытке открытия не существующего файла будет выдана ошибка Error 2: File not Found-Ошибка2: Файл не найден.

Процедура Rewrite не требует наличия файла, которому сопоставлена файловая переменная: если файл с таким именем не существует, то он будет автоматически создан. Если файловая переменная ссылается на файл с недопустимым именем, например, содержащим пробелы, то при попытке открытия его для записи будет выдана та же самая ошибка, что и при открытии несуществующего файла для чтения. Если файловая переменная ссылается на существующий файл, то при открытии для записи все его содержимое будет удалено.

ВНИМАНИЕ!

Самая распространенная ошибка начинающих программистов – это эксперименты с файлами, содержащими тексты исходных программ, в результате чего стираются исходные тексты программ. Никогда не используйте для отладки программы полезные файлы. Если программа действительно должна работать с такими файлами, обязательно создавайте их резервные копии.

Пример 3. Открытие файла для чтения.

Program Files3;

Var

T: File of Integer;	{описание файловой переменной с именем T, для работы с двоичными типизированными файлами с элементами типа Integer}
Begin
Assign (T, ‘game.bin’);	{сопоставление файловой переменной T файлу с именем game.bin, находящемуся в текущем каталоге}
Reset (T);	{открытие файла, которому сопоставлена переменная T (game.bin) для чтения}

End.