Общий вид записи операторов

write(список выражений и/или переменных);

writeln(список выражений и/или переменных);

Элементы списка перечисляются через запятую. В список могут входить также строки в апострофах ' '

Работа операторов

Элементы списка выводятся в пользовательское окно программы. Вещественные значения выводятся в экспоненциальной форме (с буквой E). Строки выводятся "как есть". После вывода работа программы продолжается со следующего оператора.

Оператор writeln отличается от write лишь тем, что после вывода значения последнего элемента списка выполняется перевод курсора на следующую строку экрана.

Примеры:

1) Нужно дать пользователю возможность ввести с клавиатуры число, затем программа возведет это число в квадрат и выведет результат на экран.

var a,a2:integer;

....

writeln ('Введите целое число:'); {это приглашение к вводу!}

read (a);

a2:=sqr(a);

writeln ('Квадрат числа=',a2);

Если ввести a=2, на экране будет напечатано

Квадрат числа=4

| ---курсор на следующей строке

После вывода результата выполнение программы продолжится, а если оператор writeln был в ней последним, то и завершится. Чтобы пользователь успел прочитать результат, следует в конце программы добавить оператор

readln;

который будет ждать нажатия клавиши Enter.

2) Нужно вывести результаты решения квадратного уравнения x1=1.5 и x2=2.5

write ('x1=',x1,'_x2=',x2);

-пробел здесь нужен, чтоб значение x1 не слилось со строкой 'x2='

на экране будет напечатано:

x1= 1.5000000000E+00 x2= 2.5000000000E+00|

-курсор остался в конце строки, т.к. использован write!

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

Управление выводом данных

В операторе write или writeln вещественное значение (а также целое или строковое) зачастую удобнее записывать в виде:

Переменная:ширина:точность

ширина – целое положительное число, определяет, сколько экранных позиций отводится для вывода всего числа. Определена для любых чисел и строк.

точность – целое положительное число, определяет, сколько цифр из ширины отводится на вывод дробной части числа. Определена только для вещественных чисел. Не учитывает позицию десятичной точки. Разумные значения точности – от 0 до ширина-2 включительно. Недопустимые значения ширины и точности не будут учтены при выводе.

Пример: печатаем значения переменных

var x1,p:real;

i:integer;

....

x1:=2.5; p:=-3.175; i:=2;

writeln ('x1=',x1:8:2,'_p=',p:9:4);

write ('I=','_':5,i:2);

На экране будет напечатано:

x1=____2.50_p=__-3.1750

I=______2

_ везде обозначает пробел