Файл: Основные понятия Файл в Паскале.ppt

Состоит из однотипных данных (integer,real и т.д.).С данными файла можно производить две основные операции: запись и чтение. Как записать в файл данные разного рода (цифры, буквы?)

1. Описание файла

Описание файла производится в разделе описания переменных, при этом указывается имя файловой переменной (логическое имя файла) и ее тип. Например:Var f : file of integer; илиVar f1:text;

2. Установление соответствия между логическим и физическим именем файла

Assign(логическое имя, физическое имя)Например, assign(f,’data.txt’);

3. Запись в файл / чтение из файла

Rewrite(f); - открытие нового файла для записи.Reset(f); - открытие существующего файла для чтения или записи. Write(f,a); - запись в файл.Read(f,a); - чтение из файла.

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

Close(f);Производится после окончания работы с файлом, отсутствие этой операции приведет к неправильной работе программы

Проверка конца файла

Eof(f) – логическая функция, ее значение – «истина», если курсор находится в конце файла и «ложно», если это не так.

ПРИМЕР

Записать в файл 10 цифр, вводимых пользователем.

Var F:text;

Var F:text;a,i:integer;Begin Assign(f,’data.txt’);Rewrite(f);Writeln(‘введите 10 цифр’);For i:=1 to 10 doBeginRead(a);Write(f,a)End;Close(f);end.ПРОГРАММА

ПРИМЕР

Написать программу сложения 5 чисел, записанных в файле.

Var a,s,i:integer;F:text;Begin Assign(f,’primer2.txt’);Reset(f);S:=0;While not eof(f) doBeginRead(f,a);S:=S+a;End;Close(f);Writeln(‘Cумма=’,s)end.ПРОГРАММА

Задание на работу

Составить программу, записывающую в файл только четные числа из тех чисел, которые вводит пользователь.Составить программу, вычисляющую произведение 5 чисел, записанных в файле.