Функции для величин порядкого типа

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

Odd(X)  проверка величины X на нечетность.

Аргументом функции является величина типа Longint, результат равен True, если аргумент нечетный, и False  если четный.

Pred(X)  определение предыдущего значения величины X.

Аргументом функции является величина любого порядкого типа, результатом  предшествующее значение того же типа (например, Pred(2) равно 1). При применении функции к первому элементу последовательности возникает ошибка.

Succ(X)  определение последующего значения величины X.

Аргументом функции является величина любого порядкого типа, результатом  последующее значение того же типа (например, Succ(2) равно 3). При применении функции к последнему элементу последовательности возникает ошибка.

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

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

Инструкции write и writeln

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

Примеры :

Write (Sum) ;

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

Write (‘Корни уравнения. X1=‘,X1,’ X2=‘,X2);

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

Для переменной типа INTEGER формат - это целое число, определяющее ширину поля вывода (количество позиций на экране). Например, инструкция WRITE(D:6) показывает, что для вывода значения переменной D используется 6 позиций. Если число занимает меньше позиций, чем указано в формате, то неиспользуемые позиции заполняются пробелами, а само изображение выравнивается по правой границе поля.

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

Write (‘Всего изделий:’,Kol:5) ;

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

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

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

Пусть переменные X1 и X2 типа REAL имеют значения 21.43 и -0.1215; тогда в результате выполнения инструкции

Write (‘X1=‘,X1:5:2,’ X2=‘,X2:12)

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

X1=21.43 X2=-1.21500E-01

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

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

X := -1.56 ;

Write(‘Значение пере’);

Write(‘менной:’);

Write(‘X=‘);

Write(X:8:5);

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

Значение переменной:X=-1.56000

Инструкция WRITELN отличается от инструкции WRITE только тем, что после вывода сообщения или значений переменных курсор переводится в начало следующей строки. Например, если значением переменной X1 является число 15.324, а переменной X2  число -2.432, то результатом выполнения инструкций

WriteLn(‘Значение корней уравнения:’);

WriteLn(‘X1=‘,X1:7:3);

WriteLn(‘X2=‘,X2:7:4);

будет следующий текст на экране:

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

X1= 15.324

X2=-2.4320