21. Организация ввода-вывода информации в типизированныъ файлах.

ввод :

Var f: file of real; // объявление файловой переменной f типа real

x: real; i: byte;

begin

assign ( f,’файл.dat’ ); // связывание f с файлом «файл.dat»

rewrite( f ); // создание и открытие для записи файла f

for i:=1 to 5 do

begin // начало цикла ввода 5-ти чисел х

write( ‘Введите число ’); readln( x ) // ввод числа х

write( f, x); // запись числа х в файл f

end; // конец цикла ввода 5-ти чисел х

close( f ); // закрытие файла f

end.

вывод :

Var f: file of real; // объявление файловой переменной f типа real

x: real; i: byte;

begin

assign ( f,’файл.dat’ ); // связывание f с файлом «файл.dat»

reset( f ); // открытие файла f для чтения

for i:=1 to 5 do

begin // начало цикла для вывода 5-ти чисел х

read( f, x ); // считывание числа х из фала f

writeln( х); // вывод числа х в окно вывода на экран

end; // конец цикла вывода 5-ти чисел х

close( f ); // закрытие файла f

end.

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

Нетипизированный файл – это последовательность элементов произвольного типа.

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

с нетипизированными файлами работают только 2 (для нас новых) оператора BLOCKWRITE и BLOCKREAD. остальные функции используемые при работе с нетипизированными файлами таже применяются и при работе с типизированными файлами.

Чтение данных из файла (считывание данных с файла в переменную)

blockread (<переменная файла>, <переменная>, <кол-во блоков>);

blockread ( f, a, 4 ); в файле f в переменную «а» считать 4 блока информации

Запись данных в файл (записывание данных с переменной в файл)

blockwrite (<переменная файла>, <переменная>, <кол-во блоков>);

blockwrite ( f, a, 4 );

в файл f из переменной «а» записывается 4 блока информации