Читайте также:
|
|
Файлы – емкости для хранения информации. Под файлом понимают именованную область памяти компьютера, или именованное устройство потенциальный источник или приемник информации.
В зависимости от внутреннего содержания файлы подразделяют на три типа:
Текстовые – компоненты коды символов;
Типизированные - компоненты объявленного типа;
Нетипизированные - тип компонентов не определен;
Конструктор типа представлен следующей синтаксической диаграммой:
Примеры использования конструктора:
var f, Myfile: Text; {Две переменные типа текстовый файл.}
f1, f2: File of Integer; {Две переменные типа файл целых чисел}
s3, h4: File of Point; {Две переменные типа файл записей }
d6: File; {Переменная типа файл}
Существует инструкция присваивания значения переменной типа файл. Эта инструкция носит название «запись в файл». Она имеет вид:
Например:
write( f, x, y, z ); write( Myfile, 3.1415926, sin(y)+2 );
Существует инструкция чтения значения из файла, эта инструкция носит название «чтение из файла». Она имеет вид:
Например:
read( f, x, y, z ); read( Myfile, a, b );
Память компьютера можно разделить на два вида: оперативного использования и длительного хранения. Данные в памятиоперативного использования «живут» только в интервале времени выполнения программы. Данные в памяти длительного хранения доступны всегда. Файлы объявленные в программе занимают память оперативного использования. Для создания их копий в памяти длительного хранения используют процедуру связывания файлов Assign. Эта процедура и ряд других подпрограмм оперирующих с файлами описан в таблице:
Подпрограммы для работы с файлами | |
Обращение | Описание |
Assign(var F: Файл; FileName: String); | Связывает переменную F с именем файла на конкретном носителе информации |
ReSet (var F [: FileType; Recsize: Word ]) | Открывает файл для чтения. Указатель устанавливается на начало файла. |
Read ([ var F: Text;] V1 [, V2,..., Vn ]) | Читает из файла значения для переменных Vi. |
IOResult: Integer | Возвращает признак операции ввода вывода. |
Rewrite (var F: FileType [; Recsize: Word ]) | Открывает файл для записи. Если в файле хранилась информация, она уничтожается |
Write ([ var F: Text; ] P1 [,P2,...,Pn ]) | Записывает в файл значения переменных Pi. |
Close (var F:FileType) | Закрывает файл. Обеспечивает сохранение записей и регистрацию файла в каталоге. |
Append (var F:Text) | Открывает существующий текстовый файл и разрешает добавлять запись в его конец. |
FileSize(var F): Longint | Возвращает размер файла в байтах |
FSplit(Path: PathStr; var Dir: DirStr; var Name: NameStr; var Ext: ExtStr) | Разбивает полное имя файла на 3 его составляющие: - путь, имя, расширение |
ReName(var F:Text; Newname) | Переименовывает файл. |
Erase (var F:FileType) | Удаляет закрытый файл с диска. |
EoLn [(var F:Text)]: Boolean | Возвращает признак достижения конца строки в текстовом файле |
EoF [(var F:Text)]: Boolean | Возвращает признак достижения конца файла |
Flush (var F:Text) | Очищает внутренний буфер файла открытого для чтения |
Для примера приведены две программы:
1. Помещаем в текстовый файл значения двух переменных. Var f: text; x, y: Real; begin x:=3.25; y:= Sin(X); Assign (f, ‘D:\MyFile.TXT’); {Связываем переменную F с файлом на диске D: } ReWrite (f); {Открываем файл F на запись} Write(f, X:8:5, Y:10:6); {Помещаем значения двух переменных в файл } Close (f); {Закрываем созданный файл} end. |
2. Читаем из текстового файла значения двух переменных и выводим их на экран. Var f1: text; x, y: Real; begin Assign (f1, ‘D:\MyFile.TXT’); Reset(f1); {Открываем файл f1 на чтение} Read (f1, x, y); {Читаем из файла две записи} Write (x:8:5, y:10:6); {Выводим на экран дисплея} Close(f 1); end. |
Задачи для классной и домашней работы (не менее 3 в классе и 3-6 дома). 13.1 – 13.38.
Дата добавления: 2015-08-21; просмотров: 112 | Нарушение авторских прав
<== предыдущая страница | | | следующая страница ==> |
Тип переменных – множество. | | | Объявление подпрограмм. |