Система программирования Турбо Паскаль. Воробьева А.П - 61 стр.

                               Var                                    При выполнении процедуры reset специальный указатель
                                f: file;                         строк устанавливается на начало файла, т.е. подготавливается к
     • Текстовые файлы. Задаются стандартным типом text, на-     чтению первой строки.
пример:                                                               Инициация записи во вновь создаваемый файл осуществляет-
                               Var                               ся с помощью процедуры:
                                f: text;                                       rewrite(<файловая переменная>);
     Компонентами текстового файла являются строки пе-                Если происходит инициация записи в существующий файл,
ременной длины. После ввода каждой строки нажимается кла-        то старый файл уничтожается, а указатель устанавливается на
виша [Enter]. При этом формируется специальный признак конца     первую строку.
строки – маркер EOLN (End Of Line). Доступ к строкам осущест-         Можно добавлять новые данные в конец существующего
вляется последовательно, начиная с первой. Число строк в тек-    файла. Для этого надо воспользоваться процедурой:
стовом файле может быть произвольным. В конце файла автома-                    append(<файловая переменная>);
тически формируется признак конца файла – маркер EOF (End Of
File).                                                                 Стандарные функции и процедуры обработки
     Наиболее часто в программах используются текстовые фай-                      текстовых файлов
лы. Поэтому в дальнейшем ограничимся рассмотрением толь-         Функции
ко текстовых файлов.                                                 eoln(<файловая переменная>) – логическая функция, воз-
                    Доступ к файлам данных                       вращающая значение TRUE, если при чтении обнаружен маркер
     Для любой программы, написанной на языке Турбо Паскаль,     конца строки, и значение FALSE – в противном случае.
всегда доступны два текстовых файла со стандартными именами          eof(<файловая переменная>) – логическая функция, воз-
файловых переменных: input – чтение данных с клавиатуры и        вращающая значение TRUE, если при чтении обнаружен маркер
output – вывод на экран. Эти файловые переменные используют-     конца файла, и значение FALSE – в противном случае.
ся «по умолчанию», т.е. нигде не упоминаются.                    Процедуры чтения данных из файла
     Любые другие файлы данных, хранящиеся на диске, стано-
вятся доступными программе после выполнения стандартной                read(<файловая переменная>, <список ввода>);
процедуры открытия файла assign. Эта процедура связывает               readln(<файловая переменная>, <список ввода>);
объявленную в программе файловую переменную с именем суще-       <список ввода> – последовательность переменных целого, ве-
ствующего или вновь создаваемого на диске файла. Обращение к     щественного, символьного или строкового типов.
процедуре имеет вид:                                                  Замечание. Для ввода строковых переменных (string) обяза-
        assign(<файловая переменная>, <имя файла>);              тельно используется процедура readln. Вызов процедуры readln
<имя файла> – строка или переменная строкового типа.             без <списка ввода> приведет к пропуску текущей строки.
Например: assign(f, ‘Wed.dat’);                                  Процедуры записи данных в файл
                       Инициация файла                                write(<файловая переменная>, <список вывода>);
     Инициировать файл данных означает указать направление            writeln(<файловая переменная>, <список вывода>);
передачи данных: чтение из файла или запись в файл.              <список вывода> – последовательность выражений целого, ве-
     Если файл создан ранее, т.е. является входным, то он ини-   щественного, символьного, строкового или логического типов.
циируется для чтения стандартной процедурой:
                reset(<файловая переменная>);
                             123                                                              124