Ввод и вывод информации в Паскале
Любая программа обязана обмениваться информацией с внешними источниками. Для этого в каждом языке программирования предусматриваются специальные команды или функции. Средства ввода и вывода языка Паскаль достаточно специфичны. Рассмотрим сначала общую концепцию.
В операционной системе MS DOS пржде, чем читать информацию из файла или писать ее в файл, файл должен быть открыт. Процедура открытия заключается в создании в оперативной памяти специального хранилища (буфера) для информации файла, в создании специальной записи описания характеристик файла и присвоении открытому файлу уникального идентификационного номера, согласно которому происходят все операции ввода-вывода, осуществляемые операционной системой. Соответственно этому в Турбо?Паскале разделены операции чтения и записи и операции открытия и закрытия файла. Кроме того, отдельно выделена специфичная для Турбо?Паскаля операция соединения переменной файла с именем файла. Все эти и другие операции ввода-вывода осуществляются в Паскале с помощью специальных функций ввода-вывода. Объединяет эти функции общая файловая переменная f (переменная, объявленная в разделе переменных с
типом file of <тип отдельной записи файла>) .
Функция Assign (f, name) соединяет файл с именем name c файловой переменной f. Это соединение будет существовать до следующего соединения той же файловой переменной с другим файлом. Файловой переменной при объявлении сопоставляется определенный тип отдельной записи файла (не следует смешивать общее понятие записи файла и понятие типа записи языка Паскаль). Проверка корректности соответствия объявленногов Паскале типа записи файла реальному содержимому файла возлагается на программиста.
Функция Rewrite (f) открывает файл, предварительно связанный с файловой переменной f, в режиме “только для записи”. В этом режиме разрешается только заносить информацию в файл. Несуществующий файл при вызове Rewrite создается, а содержимое существующего файла уничтожается. Следует отметить, что в Паскале нельзя открыть файл только для записи, не уничтожив его содержимого.
Исключение делается только для текстового файла, о чем пойдет речь ниже.
Запись информации в файл, открытый функцией Rewrite
(f), из некоторой переменной осуществляется функцией Write (f, <имя переменной>). При этом программист должен следить за тем, чтобы тип переменной и тип записи файла были согласованы. С каждым открытым файлом связывается указатель, который устанавливается на текущую запись или после конца последней записи. Занесение очередной записи производится в место, отмеченное указателем, после чего он располагается после только что занесенной записи файла. Имеется возможность с помощю функции Seek непосредственно установить указатель текущей записи на любую запись.
Функция Reset (f) открывает файл, предварительно связанный с файловой переменной f, в режиме “для чтения и записи”. При открытии файла процедурой Reset текущей становится первая запись. При чтении очередной записи указатель текущей записи сдвигается на следующую запись. Изменяется положение текущей записи с помощью функции Seek.
Чтение информации из файла, открытого функцией Reset (f), в некоторую переменную осуществляется функцией Read (f, <имя переменной>). При этом программист также должен следить за тем, чтобы тип переменной и тип записи файла были согласованы.
Функция Close (f) закрывает файл, связанный с файловой переменной f, не разрывая связи переменной f с именем файла.
Функция Seek (f, number) устанавливает указатель текущей записи на запись с номером number.
Функция Truncate (f) позволяет уничтожить в файле все записи, начиная с текущей. Указатель текущей записи при этом автоматически оказывается установленным на конце файла.
Функция Eof (f) проверяет положение указателя текущей записи в файле, связанном с файловой переменной f. Если этот указатель установлен на конце файла после последней записи или файл пустой, функция Eof (f) возвращает значение true, в противном случае возвращается значение false.
Функция FileSize (f) вычисляет количество записей в файле.
Функция FilePos (f) возвращает номер текущей записи файла.
Очень важное значение в Паскале имеют файлы, состоящие из отдельных символов (то есть файлы типа file of char). Для этих файлов в Турбо?Паскале используется предопределенный тип text. Кроме того, для операций ввода-вывода текстового файла Турбо?Паскаль предоставляет дополнительные возможности. Выражается это в том, что функции read
и write для файла типа text могут считывать и записывать числовую информацию с автоматическим преобразованием в символьный формат. Правила при этом следующие. Функция read читает один символ в переменную типа char, фиксированное число символов в переменную типа string
и символьную запись числа в числовую переменную. Возможно также прочесть за один вызов несколько значений в несколько переменных, например: read (f, v1,v2,v3,v4).
В Турбо?Паскале также действуют соглашения о разбиении текстового файла на строки. Признаком конца текстовой строки является пара символов с кодами 13 и 10. Можно также использовать модификацию функции чтения с именем readln. При этом после окончания чтения функцией readln
указатель файла автоматически устанавливается на начало следующей строки. Сами символы конца строки игнорируются.
Функция записи write (f, v1,v2,v3,v4) помещает в текстовой файл один символ из переменной типа char, символьную строку из переменной типа string и символьную запись числа из числовой переменной. Если же для записи используется функция writeln, то после последнего выведенного значения вставляется конец строки.
Функции write и writeln используют средства форматирования для управления видом выводимых чисел. Например, write (f, n:10:3) означает, что число n записывается текстом ширины 10 с тремя цифрами после десятичной точки, причем запись выравнивается вправо.
Если в функциях read, readln, write и writeln
отсутствует файловая переменная, то в функциях чтения подразумевается стандартный текстовой входной файл input (обычно клавиатура), а в функциях записи подразумевается стандартный текстовой выходной файл output
(обычно дисплей).
