5.2. Оператор вывода информации

Вывод информации представляет собой передачу данных после обработки на внешние носители, которыми могут быть терминал или печатающее устройство (принтер). Для выполнения операций вывода используются операторы WRITE и WRITELN.

Формат оператора вывода (записи):

WRITE (V1, V2,...,VN);

где V1, V2,..., VN – выражение целочисленного типа, вещественного, символьного, строкового, логического.

В операторе вывода можно указывать также формат данных. Для данных типа REAL это делается следующим образом:

WRITE(VAR1: P: Q);

где VAR1 – выражение типа REAL, P – общее число знакомест, Q – число цифр, выводимых после десятичной точки.

П р и м е р ы

Значение А	Оператор	Результат
210.11	WRITE(A:8:4)	210.1100
-21.7822	WRITE(A:7:2)	_- 21.78

В последнем примере символ «_» означает пробел.

Если выражение имеет тип INTEGER, CHAR, BOOLEAN, то указывается общее число позиций:

WRITE(V1: P);

Для случая вещественного типа выражения и отсутствия указателя числа позиций вывод осуществляется в формате с плавающей точкой, а под число отводится поле шириной 18 символов. Данные типа BOOLEAN, INTEGER, CHAR при отсутствии указателя числа отводимых под результат позиций выводятся, начиная с позиции расположения курсора.

П р и м е р ы

Значение А	Оператор	Результат
123	WRITE(A,A:4,A:4)	123_123_123
‘D’	WRITE(A,A)	DD
TRUE	WRITE(A,A)	TRUE
834.218	WRITE(A)	8.3421800000E+02
-2.111E+01	WRITE(A)	-2.1110000000E+01

Оператор вывода WRITELN действует подобно оператору WRITE, но в отличие от него после вывода значения последнего элемента списка выполняется перевод курсора к началу следующей строки. WRITELN без параметров выполняет перевод курсора к началу следующей строки. Таким образом, оператор WRITELN (V1,...,VN) эквивалентен двум операторам WRITE(V1,...,VN); WRITELN.

5.3. Оператор ввода информации

Формат оператора:

READ (VAR1, VAR2, ... , VARN);

где VAR1, VAR2, ... , VARN – идентификаторы переменных. Значения переменных VAR1, VAR2, ... , VARN вводятся с клавиатуры (друг от друга они должны отделяться хотя бы одним пробелом). После набора данных для одного оператора READ нажимается клавиша «Enter». При этом необходимо, чтобы вводимые данные и переменные в операторе READ имели один и тот же тип или совместимый тип.

П р и м е р

Оператор	Набираемый на клавиатуре текст
1. READ (A,B);(A,B – INTEGER)	10 12 <ввод>
2. READ (A,B); READ (C,D); (C, D - INTEGER)	10 12 <ввод> 14 16 <ввод>

Оператор READLN действует аналогично оператору READ с той разницей, что после считывания последнего значения в списке для оператора READLN осуществляется автоматический переход к считыванию следующей строки данных.

П р и м е р

Оператор	Набираемый на клавиатуре текст
READLN (A,B); READLN (C,D);	10 12 <ввод> 14 16 <ввод>

П р и м е р программы расчета площади прямоугольника по известным сторонам.

PROGRAM PRIM5;

VAR

A,B,S:REAL; {A, B – стороны, S – площадь}

BEGIN

READLN(A,B);

S:= A*B;

WRITE(‘для сторон A= ’,A:10:2,‘B= ’, B:10:2,‘_-_’);

WRITELN(‘площадь прямоугольника S=’, S:12:4)

END.