Запись в текстовый файл

Для записи отдельных символов в текстовый файл используется процедура

Write( < имя файловой переменной >, < список вывода >);

Процедура

Writeln( < имя файловой переменной >, < список вывода >) ;

после значений списка вывода добавляет в файл символ "конец строки". Процедура Writeln( < имя ф.переменной >, < список вывода >) эквивалентна по своему действию двум процедурам:

Write( < имя файловой переменной >, < список вывода >); {запись символа "конец строки"} Writeln( <имя файловой переменной> );

Для записи в текстовый файл констант целого, вещественного, символьного или булевского типа можно использовать процедуру Write со списком вывода, который содержит имена переменных и форматы вывода. В результате вывода в текстовый файл записываются последовательности символов, являющиеся изображением констант - значений переменных из списка вывода. Поясним операцию записи констант в текстовый файл 'prim.txt' на примере:

. . . var     F: text;     I, J: integer;     C1: char;     R: real;     B: boolean; begin     assign(F,'prim.txt');     rewrite(F);     I := 49; C1 := 'A'; J := 56;     R := 3.5; B := TRUE;     writeln( F, I:2, C1:2, J:2, R:5:2, B:5 ); . . .

В результате в файле 'prim.txt' будет записана следующая последовательность символов:

49 A56 3.50 TRUE

Отметим, что чтение булевских констант из файла с помощью процедур Read и Readln не предусмотрено. Если вывод осуществляется в стандартный текстовый файл OUTPUT, имя файловой переменной в процедурах записи можно опускать.

Файлы в Тубо Паскаль

Введение файлового типа в язык ПАСКАЛЬ вызвано необходимостью обеспечить возможность работы с периферийными (внешними) устройствами ЭВМ, предназначенными для ввода, вывода и хранения данных. Файловый тип данных или файл определяет упорядоченную совокупность произвольного числа однотипных компонент. Общее свойство массива, множества и записи заключается в том, что количество их компонент определено на этапе написания программы, тогда как количество компонент файла в тексте программы не определяется и может быть произвольным. Понятие файла достаточно широко. Это может быть обычный файл на диске, коммуникационный порт ЭВМ, устройство печати, клавиатура или другие устройства. Задание файловой переменной Файловый тип или переменную можно задать одним из трех способов:          <имя> = FILE OF <тип> <имя>      - имя файлового типа (правильный идентификатор); FILE OF  - зарезервированные слова; <тип>      - любой тип Turbo Pascal кроме файлов. В зависимости от способа объявления можно выделить три вида файлов:

• типизированные файлы (задаются предложением FILE OF);

• текстовые файлы (определяются типом TEXT);

• нетипизированные файлы (определяются типом FILE).

Доступ к файлам Файлы и логические устройства становятся доступны программе только после выполнения особой процедуры открытия файла (логического устройства). Эта процедура заключается в связывании ранее объявленной файловой переменной с именем существующего или вновь создаваемого файла, а также в указании направления обмена информацией: чтение из файла или запись в него Файловая переменная связывается с именем файла в результате обращения к стандартной процедуре ASSIGN: ASSIGN (<ф. п.>, <имя файла или л. у.>); Здесь <ф. п.> - файловая переменная; <имя файла или л. у.> - текстовое выражение, содержащее имя файла или логическое устройство. Если имя файла задается в виде пустой строки, например, ASSIGN(f, ''), то в зависимости от направления обмена данными файловая переменная связывается со стандартным файлом INPUT или OUTPUT.

Имена файлов Имя может содержать до 8 символов, расширение - до трех. Могут использоваться следующие символы:           A - z 0 - 9 ( ) { } @ # $ 1 0% ^ & ! - _ / ' ~ Полное имя файла в MS DOS содержит весь путь по дереву от корневой директории к нужному файлу. Например, C:\ST\LAB\work.pas, где C - имя диска, ST - имя директории на диске, LAB - имя поддиректории директории ST, work.pas - имя программы на Паскале.

Инициализация файла Инициировать файл - значит указать для него направление передачи данных. В Турбо Паскале можно открыть файл для чтения, для записи информации, для чтения и записи одновременно. Инициализация файла для чтения: RESET (ф. п.); Здесь RESET - стандартная процедура Паскаля <ф. п.> - файловая переменная, связанная ранее процедурой ASSIGN с уже существующим файлом или логическим устройством - приемником информации. Инициализация файла для записи: REWRITE (ф. п.); Здесь REWRITE - стандартная процедура Паскаля