Стандартные процедуры консольного вывода

Для консольного вывода данных в Delphi используются стандартные процедуры вывода Write(..) и Writeln(..). Процедура Write(..) предназначена для вывода на экран монитора сообщений и значений переменных. Она также обеспечивает вывод информации в текстовый файл или передачу ее на логическое устройство. Формат процедуры Write(..):

Write(<Список вывода>);

где:

<Список вывода> - список переменных, разделенных запятыми, значения которых должны быть выведены. Кроме имен переменных в список можно включить сообщение - текст, заключенный в одиночные кавычки (строковую константу).

Например:

Write(summa);

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

Write('Корни уравнения. xl=', xl, ' х2=', х2);

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

Для переменных целого типа (ShortInt, SmallInt, LongInt, Int64, Byte, Word, Longword, Integer) формат - это целое число, которое задает ширину поля вывода (количество позиций на экране).

Например, оператор

Write(d:5);

показывает, что для вывода значения переменной d используется 5 позиций.

Если значение переменной такое, что его изображение занимает меньше позиций, чем указано в формате, то перед первой цифрой числа будут выведены пробелы так, чтобы общее количество выведенных символов было равно указанному в формате.

Например, если значение переменной koi типа Integer равно 15, то в результате выполнения оператора

Write('Всего изделий:', kol:5);

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

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

Для переменных вещественного типа (Real48, Single, Double, Extended, Comp, Currency, Real) формат представляет собой два целых числа, разделенных двоеточием. Первое число определяет ширину поля вывода, второе - количество цифр дробной части числа. Если задать только ширину поля, то на экране появится число, представленное в формате с плавающей точкой.

Например, пусть переменные x1 и х2 типа Real имеют значения 13.25 и -0.3401, тогда в результате выполнения оператора

Write('x1=', x1:5:2, ' х2=', х2:12)

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

x1=13.25 х2=-3.40100е-01

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

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

х:= -2.73;

Write('Значение перем');

Write('енной:');

Write(' х=');

Write(x:9:5);

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

Значение переменной: х= -2.73000

Процедура Writeln(..) отличается от процедуры Write(..) только тем, что после вывода сообщения или значений переменных курсор переводится в начало следующей строки. Например, если значением переменной x1 является число -3.561, а значением переменной х2 - число 10.345, то результатом выполнения процедур

Writeln('Значения корней уравнения:');

Writeln('x1=',x:8:3);

Writeln('х2=',х:7:3);

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

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

x1= -3.5610

х2= 10.345