Реферат: Организация внешних файлов и работа с ними

L1:Integer; (*длина файла*)

X; Real; (*число*)

SUM: Real; (*сумма*)

Begin

SUM: = 0;

RESET (F1; D1; DAT; L1)

WHILE NOT EOF (F1) DO

Begin

WHILE NOT EOLN (F1) DO

Begin

READ (F1, X);

SUM: = SUM + X

end;

Readln (F1)

end;

WRITE ('сумма=; SUM:8:3);

CLOSE (F1)

end.

Сумма = 42.124

В программе 1.1: F1 - файловая переменная, с помощью которой устанавливается связь с файлом D1.DAT. Физическое имя файла указывается только при открытии файла в операторе RESET. В остальных операторах при необходимости работы с файлом указывается файловая переменная F1. Оператор READ (F1,X) применяется для считывания данных (по одному) из внешних файлов в переменной Х. После оператора CLOSE (F1) данные файла становятся недоступными программе. Значение вычисленной суммы выводится на экран дисплея.

Запись файла.

Под записью файла понимается запись результатов программы из оперативной памяти ЭВМ на диск, т.е. создание нового файла на внешнем устройстве. В программе необходимо выполнить следующие действия для записи файла:

открыть файл для записи (REWRITE);

вывести данные (WRITE);

закрыть файл для записи (CLOSE).

Внешний файл, в котором записываются данные из программы, часто называют входными.

Общая форма записи файла:

REWRITE (имя 1);

. . .