ВУЗ:
Составители:
Рубрика:
86
Read(F, Fam, Name, Otch);
Write(Fam:16, Name:11, Otch:15);
end;
close(F);
End.
12.5. Типизированные файлы
Компоненты этого файла могут быть следующих типов:
базового: byte, word, longint, integer, real, запись, char, string;
структурного;
регулярного.
При этом все компоненты файла имеет один и тот же тип. Это означает, что длина
компоненты фиксирована.
Объявляется такой файл в программе следующим образом :
Var
F1 : File of byte;
F2 : File of string[80];
F3 : File of real;
. . .
F : File of RecFile;
Здесь F1, F2, F3, F - это файловые переменные, которые указывают на файлы, компонеты
которых соответственно являются типа byte, string, real и record.
Чтение компонент файла выполняется процедурой:
Read(< ф.п.>, < список ввода >);
Запись компонент в файл выполняется процедурой:
Write(< ф.п.>, < список вывода >);
Пример:
Var
X, Y : array[1..100] of integer; { массивы координат }
F : file of real;
i : byte;
Begin
. . .
< операторы по вводу 100 значений координат X, Y >
. . .
Assign(F, 'Coor.dat'); { файл будет создаваться в текущем каталоге }
ReWrite(F); { открытие файла для записи }
For i:= 1 to 100 do
Write(F, X[i], Y[i]); { запись координат в файл }
Close(F);
End.
В приведенном фрагменте программы координаты записаны последовательными парами X,
Y. При такой организации файла происходит частое обращение к внешнему носителю, это
приводит к замедлению работы программы, что особенно заметно при работе с большими
объемами данных. Поэтому рекомендуется данные записывать в файл и считывать из
файла большими блоками, примерно кратными 512 байтам.
Согласно этому модифицируем программу следующим образом:
Type
Coord = array[1..100] of integer; { массивы координат }
. . .
Var
Read(F, Fam, Name, Otch); Write(Fam:16, Name:11, Otch:15); end; close(F); End. 12.5. Типизированные файлы Компоненты этого файла могут быть следующих типов: базового: byte, word, longint, integer, real, запись, char, string; структурного; регулярного. При этом все компоненты файла имеет один и тот же тип. Это означает, что длина компоненты фиксирована. Объявляется такой файл в программе следующим образом : Var F1 : File of byte; F2 : File of string[80]; F3 : File of real; ... F : File of RecFile; Здесь F1, F2, F3, F - это файловые переменные, которые указывают на файлы, компонеты которых соответственно являются типа byte, string, real и record. Чтение компонент файла выполняется процедурой: Read(< ф.п.>, < список ввода >); Запись компонент в файл выполняется процедурой: Write(< ф.п.>, < список вывода >); Пример: Var X, Y : array[1..100] of integer; { массивы координат } F : file of real; i : byte; Begin ... < операторы по вводу 100 значений координат X, Y > ... Assign(F, 'Coor.dat'); { файл будет создаваться в текущем каталоге } ReWrite(F); { открытие файла для записи } For i:= 1 to 100 do Write(F, X[i], Y[i]); { запись координат в файл } Close(F); End. В приведенном фрагменте программы координаты записаны последовательными парами X, Y. При такой организации файла происходит частое обращение к внешнему носителю, это приводит к замедлению работы программы, что особенно заметно при работе с большими объемами данных. Поэтому рекомендуется данные записывать в файл и считывать из файла большими блоками, примерно кратными 512 байтам. Согласно этому модифицируем программу следующим образом: Type Coord = array[1..100] of integer; { массивы координат } ... Var 86
Страницы
- « первая
- ‹ предыдущая
- …
- 84
- 85
- 86
- 87
- 88
- …
- следующая ›
- последняя »