Инструкции write и writeln

Инструкция WRITE предназначена для вывода на экран монитора сообщений и значений переменных. В инструкции после слова WRITE в скобках задается список имен переменных. Кроме имен переменных в список можно включить сообщение ¾ текст заключенный в апострофы.

Примеры:

Write (Sum);

Write (‘Результат вычислений’);

Write (‘Корни уравнения. X1=‘,X1,’ X2=‘,X2);

После имени переменной через двоеточие можно поместить описание (формат) поля вывода значения переменной.

Для переменной типа INTEGER формат - это целое число, определяющее ширину поля вывода (количество позиций на экране). Например, инструкция WRITE(D:6) показывает, что для вывода значения переменной D используется 6 позиций. Если число занимает меньше позиций, чем указано в формате, то неиспользуемые позиции заполняются пробелами, а само изображение выравнивается по правой границе поля.

Например, если значение переменной Kol типа INTEGER равно 15, то в результате выполнения инструкции

Write (‘Всего изделий:’,Kol:5);

на экран будет выведено:

Всего изделий: 15

Для переменных типа REAL формат представляет собой два целых числа, разделенных двоеточием. Первое число определяет ширину поля вывода, второе - число цифр, стоящих справа от десятичной точки. Если задать только ширину поля, то на экране появится число, представленное в формате с плавающей точкой.

Пусть переменные X1 и X2 типа REAL имеют значения 21.43 и -0.1215; тогда в результате выполнения инструкции

Write (‘X1=‘,X1:5:2,’ X2=‘,X2:12)

на экран будет выведено:

X1=21.43 X2=-1.21500E-01

Если ширины поля, указанной в формате недостаточно для вывода значения переменной, то выводится число в формате с плавающей точкой и десятью цифрами после запятой (все поле вывода в этом случае занимает 17 позиций).

После выполнения инструкции WRITE курсор остается в той позиции экрана, в которой он находился после вывода последнего сообщения этой инструкции. Следующая инструкция WRITE начинает вывод именно с этой позиции. Например, в результате выполнения инструкций

X:= -1.56;

Write(‘Значение пере’);

Write(‘менной:’);

Write(‘X=‘);

Write(X:8:5);

на экран будет выведено:

Значение переменной:X=-1.56000

Инструкция WRITELN отличается от инструкции WRITE только тем, что после вывода сообщения или значений переменных курсор переводится в начало следующей строки. Например, если значением переменной X1 является число 15.324, а переменной X2 ¾ число -2.432, то результатом выполнения инструкций

WriteLn(‘Значение корней уравнения:’);

WriteLn(‘X1=‘,X1:7:3);

WriteLn(‘X2=‘,X2:7:4);

будет следующий текст на экране:

Значения корней уравнения:

X1= 15.324

X2=-2.4320

Дата добавления: 2015-07-10