Процедура
вывода Write
производит вывод данных.
Общий
вид: Write(<список
вывода>);
В
списке вывода могут быть представлены
выражения допустимых типов данных (integer,
real,
char
и т.д.)
и произвольный текст, заключенный в
апострофы.
Например,
Write(‘Привет’); Write(34.7); Write(45+55);
Write(b, d);
Процедура
Writeln
аналогична
процедуре Write.
Отличие в том, что после вывода последнего в
списке выражения курсор переходит на
начало новой строки.
В
процедурах вывода Write
и Writeln
имеется возможность записи выражения,
определяющего ширину поля вывода.
При
рассмотрении форматов вывода примем
следующие обозначения:
I,
p,
q
– целочисленное выражение;
R
-
выражение вещественного типа;
#
- цифра;
*
- знак «+» или «- »;
_
- пробел.
|
Значение
I |
Выражение |
Результат |
|
324 |
Write
(I); |
324 |
|
34 |
Write
(I, I, I); |
343434 |
|
324 |
Write
(I : 6); |
___324 |
|
312 |
Write
(I + I : 7); |
____624 |
|
|
|
|
|
Значение
R |
Выражение |
Результат |
|
123.432 |
Write
(R); |
__1.2343200000E+02 |
|
-1.34E+01 |
Write
(R); |
_
-1.3400000000E+01 |
|
304.55 |
Write
(R :15); |
3.045500000E+02 |
|
Значение
R |
Выражение |
Результат |
|
304.66 |
Write
(R
:8 : 4); |
304.6600 |
|
45.322 |
Write
(R : 5 : 2); |
45.32 |
Пример:
Program
primer;
Var
a, b, c, sum:integer;
begin
a:=4;
b:=6; c:=55;
Write(a:3);
Write(b:3); Write(c:3);
Sum:=a+b+c;
Writeln
(‘A=’,a);
Writeln
(‘B=’,b);
Writeln
(‘C=’,c);
Writeln
(‘Сумма
A+B+C равна
’, sum);
End.
Результат
выполнения:
4
6 55
А=4
В=6
С=55
Сумма
А+В+С равна 65
<<<Предыдущий урок | К содержанию | Следующий урок>>>