Алгоритмы и программы. Афанасьева Т. В - 92 стр.

UptoLike

ВУЗ: 

УлГТУ | Ульяновск

Составители: 

Рубрика: 

92
5.1. Основные процедуры и функции для работы с файлами
Для ввода данных из файла используются процедуры read, readln в
форме
read (<имя1>,<список ввода>).
Для вывода в файл – процедуры WRITE,WRITELN в виде
write (<имя1>, <список вывода>)
Здесь <имя1> – имя файловой переменной, и
<список вывода> – последовательность одной или более
переменных.
Тип переменных должен соответствовать типу файловой
переменной, если файл типизированный.
Для определения конца
файла используется функция EOF(<имя1>):
boolean. Она возвращает значение TRUE, если достигнут конец файла. При
записи это означает, что очередной компонент будет добавлен в конец
файла, при чтении – что файл исчерпан.
В типизированном файле доступ к каждому компоненту можно
производить по его порядковому номеру или указателю.
Перед первым обращением к процедуре read или write
указатель
файла стоит в начале и указывает на компонент файла с номером 0. После
каждого чтения/записи указатель сдвигается к следующему компоненту.
При работе с типизированными файлами можно применять
дополнительные стандартные процедуры и функции:
– процедура SEEK(F,N) (для смещения указателя файла F к
компоненту N),
– функция FILESIZE(F) (для определения количества компонент в
файле F),
–
функция FILEPOS(F) (для определения следующего номера
компоненты файла F),
– функция SEEKEOF(F) (для смещения в конец файла F ).
Пример 5.1. Ввод из файла 10 значений x, вычисление для них
значений функции y= x*x+2*x–3 и нахождение максимального значения y.
program kr3;
var x:integer;
ma,y:integer;
i:byte;
c:integer;
f:file of integer; {объявление файловой переменной }
begin
assign (f,'mkurs.dat'); {связывание файловой переменной с именем файла}
reset (f); {открытие файла для чтения}
ma:=–32000;

Страницы