Типизированные константы
Типизированные константы фактически представляют собой инициализированные переменные и могут использоваться наравне с обычными переменными, в том числе и в левой части операции присваивания.
Для каждой такой константы задается ее имя, тип и начальное значение. Тип от имени отделяется двоеточием, начальное значение от типа - знаком равенства:
CONST
Maximum : Integer = 9999 ;
Rea : Real = -0.75 ;
Bell : Char = #7 ;
Стандартные функции
В языке Паскаль существует ряд заранее разработанных подпрограмм - функций, которые можно использовать как готовые объекты. В Turbo Pascal их количество увеличено по сравнению со стандартом языка, и все они объединены в стандартные модули.
Рассмотрим наиболее часто используемые стандартные функции.
Арифметические функции
Арифметические функции можно использовать только с величинами целого и вещественного типа. Их перечень приведен в табл. 6.
Таблица 6. |
||
Функция |
Назначение |
Тип результата |
Abs(X) Arctan(X) Cos(X) |
Абсолютное значение аргумента Арктангенс аргумента Косинус аргумента |
Совпадает с типом X Вещественный Вещественный |
Exp(X) |
|
Вещественный |
Frac(X) Int(X) Ln(X) Pi Sin(X) Sqr(X) Sqrt(X) |
Дробная часть числа Целая часть числа Натуральный логарифм Значение Pi=3.1415926535897932385 Синус аргумента Квадрат аргумента Квадратный корень аргумента |
Вещественный Вещественный Вещественный Вещественный Вещественный Совпадает с типом X Вещественный |
Примечание. Если функция используется с ключом компилятора {$N+}, то вместо величины типа Real она вычисляет величину типа Extended.
Пример. {$N-}
begin
P := Pi { 3.1415926536E+00 }
end.
{$N+}
begin
P := Pi { 3.1415926535897932385E+00 }
end.
Функции преобразования типа
Эти функции предназначены для преобразования типов величин, например символа в целое число, вещественного числа в целое и т. д. К ним относятся следующие функции:
Chr(X) преобразование ASCII - кода в символ.
Аргумент функции должен быть целого типа в диапазоне (0…255). Результатом является символ, соответствующий данному коду.
Ввод и вывод информации
В любой программе должны быть инструкции, обеспечивающие прием исходных данных и выдачу пользователю результатов.
Инструкции 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