Процедура записи производит вывод числовых данных, символов, строк и значений логического типа на экран пользователя.
Формат:
Write(<выводимая информация>);
В качестве выводимой информации могут быть:
· переменные, предварительно описанные в соответствующем разделе — Var
Write(имя переменной); — выводится значение переменной.
Пример:
· константы (задаются либо по имени, либо непосредственно значением)
Write(имя константы);
Пример:
· арифметические выражения
Пример:
Write(2 + 80 * 3);
Write(a * 5 - b);
· строки (обязательно заключаются в апострофы)
Пример
Основным неудобством процедуры Write является то, что курсор остается в той строке экрана, где находится последний символ выведенной информации. То есть, для того, чтобы вывести какую-либо информацию с новой строки, нужно заполнить до конца предыдущую. Это возможно, если заранее известно, сколько символов уже выведено на экран. (Однако, в некоторых случаях программа не может получить такую информацию. Например, программа, выводящая на экран квадраты чисел, выведенных пользователем не может определить, сколько символов занимает на экране то или иное число.)
К тому же вообще неизвестно, в каком положении находился курсор в начале работы программы. Для решения таких проблем предназначена процедура Writeln (от англ. Write Line – вывести линию), имеющая такие же параметры, как и процедура Write.
В отличие от процедуры Write, после вывода информации она перемещает курсор в начало следующей строки. При этом информация выводится не с новой строки, а также как и в случае с Write, из положения курсора.
Если процедура Writeln используется без параметров, то никакой информации на экран не выводится, а курсор перемещается на новую строку.
В случае необходимости в процедурах Write и Writeln можно указывать несколько параметров, разделенных запятыми.
Write(<выводимая информация>); – вывод информации на экран, курсор остается после последнего введенного символа
Writeln(<выводимая информация>); – вывод информации на экран, курсор после последнего введенного символа перемещается в следующую строку.
Задание 1. Рассмотрите пример. В какой форме появятся сообщения на экране? Поясните ответ.
…
Const MyAge=15;
Begin
Write(‘Меня зовут …….’);
Writeln(‘Мне’, MyAge, ‘лет’);
Writeln(‘Ох и молод же ты!’);
Write(‘А мне, Турбо Паскалю’, 3*MyAge, ‘лет’);
End.
Форматы вывода
В процедурах вывода имеется возможность записи выражения, определяющего ширину поля вывода (количество ячеек, отводимых на вывод информации).
Пусть I, p, q – целочисленное выражение, R – выражение вещественного типа.
Таблица 1
| Значение I | Выражение | Результат на экране |
| I – выводится десятичное представление величины I, начиная с позиции расположения курсора. | ||
| Write(I); | ||
| Write(I); | ||
| Write(I, I, I); | ||
| I:p – выводится десятичное представление величины I в крайние правые позиции поля шириной p. | ||
| Write(I:6); | ___555 | |
| Write(I:8); | ____8765 | |
| Write(I, I:8); | 123_____123 | |
| Write(I+I:8); | _____246 | |
Таблица 2
| Значение R | Выражение | Результат |
| R – в поле шириной 18 символов выводится десятичное представление величины R в формате с плавающей точкой. начиная с позиции расположения курсора. Если R≥0.0, используется формат _#.##########.E±## | ||
| 234.05 | Write(R); | ____2.34050000E-02 |
| -1.919E+01 | Write(R); | -1.91900000000E+01 |
| 567.986 | Write(R/2); | __2.8399300000E+02 |
| R:p – выводится десятичное представление величины R в крайние правые позиции поля шириной p. Минимальная длина поля вывода 8 символов. После десятичной точки выводится по крайней мере одна цифра. | ||
| 500.05 | Write(R:12); | 5.000500E+02 |
| -500.05 | Write(R:12); | -5.00050E+02 |
| 12.34 | Write(-R:12); | -1.23400E+01 |
| R:p:q –в крайние правые позиции поля шириной p символов выводится десятичное представление значения R в формате с фиксированной точкой, причем после десятичной точки выводится q цифр (0≤q≤24), представляющих дробную часть числа. Если q=0, ни дробная часть, ни десятичная точка не выводится. Если q>24, то при выводе используется формат с плавающей точкой. | ||
| 500.05 | Write(R:8:4); | 500.0500 |
| -43.21 | Write(R:8:2); | __-43.21 |
| -43.21 | Write(R:12:4); | ____-43.2100 |
Задание 2. Составить программу оформления вычисления площади прямоугольника в виде таблицы. Значение переменным A и B присваивается в программе, значение переменной S вычисляется также в программе.
Задание 3. Дополните программу так, чтобы вторая строка таблицы была разбита на ячейки.