Ввод и вывод информации

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

Инструкции WRITE и WRITELN

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

Примеры :

Write ( Summa ) ;

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

Write (`Корни уравнения. X1=`, x1,` x2=`, x2) ;

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

Для переменной типа integer формат – это целое число, определяющее ширину поля вывода (количество позиций на экране). Например, инструкция write(d :5) показывает, что для вывода значения переменной d используется 5 позиций. Если число занимает меньше позиций, чем указано в формате, то неиспользованные позиции заполняются пробелами, а само изображение выравнивается по правой границе поля.

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

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

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

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

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

Пусть переменные х1 и х2 типа real имеют значения 13.25 и -0.3401; тогда в результате выполнения инструкции

Write ( `x1= `, x1 :5:2, ` x2= `, x2:12)

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

X1=13.25 x2= -3.40100E-01

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

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

Х := -2.73;

Write ( `значение перем `) ;

Write ( `енной `) ;

Write ( `x= `) ;

Write (x:8:5) ;

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

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

Инструкция writeln отличается от инструкции write только тем, что после вывода сообщения или значений переменных курсор переходит в начало следущей строки. Например, если значением переменной х1 является число –3.561, а переменной х2 – число 10.345, то результатом выполнения инструкций

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

Writeln ( `x1=`, x:7:3 ) ;

Writeln (x2= `, x:7:3) ;

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

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

Х1= -3.5610

Х2= 10.345