Иногда, бывает так, что у нас в программе встречаются величины, которые не меняются в процессе выполнения программы (т.е. фактически они противоположность переменных). Такие величины называются константами. Константы указываются в специальном разделе, который называется Const.

В качестве констант в языке программирования Pascal могут использоваться:

• Целые числа. Они записываются со знаком или без знака и могут иметь значение от – 2 147 483 648 до + 2 147 483 647. Если константа имеет значение, выходящее за эти пределы, то в качестве значения константы необходимо использовать вещественные числа.
• Вещественные числа записываются со знаком или без знака с использованием десятичной точки или экспоненциальной части, которая начинается с символа «e», за которым следует десятичный порядок. Например, запись 3.14e5 означает 3,14*10⁵. А запись – 3.14e-4 означает – 3,14*10^-4.
• Шестнадцатеричные числа, которые состоят из шестнадцатеричных цифр со знаком доллара «$» впереди. Диапазон шестнадцатеричных чисел — от $00000000 до $FFFFFFFF.

program number21;
uses crt;
Const G = 9.8;
Var V, H: Real;
begin
clrscr;
writeln (‘Введите высоту башни:’);
readln (H);
V:=Sqrt(2*G*H);
writeln (‘Скорость падения равна ‘,V:6:3);
readln
end.

Строка №3. Раздел Const - это раздел, который описывает константы. Он должен находиться перед разделом Var, описывающий переменные. В данном случае, в разделе описания констант мы записываем константу «G», которая будет являться именем нашей константы (имя мы придумываем сами) и указываем для нее значение 9.8. В нашей программе константа «G» будет описывать ускорение свободного падения, которое, как известно, величина постоянная и равна 9.8 м/с. Тип константы определяется автоматически. Т.е. здесь, в отличии от раздела описания переменных Var не нужно указывать тип данных. В данном случае число 9.8 дробное, поэтому тип данных будет вещественным. Обратите внимание, что когда мы присваиваем константе какое-либо значение, то используется знак «=». Это отличает константы от переменных. Если Вы помните, то при присвоении переменной какого-либо значения используется знак «:=».

В строке №9 записываем формулу для расчета скорости свободного падения, которая, как известно, вычисляется по формуле V²=2gh

В появившемся окне введем высоту башни, например 10, и нажмем Enter.

Использование шестнадцатеричных чисел в качестве значения константы.

Program number22;
Uses Crt;
Const t = $f;
Begin
ClrScr;
Write(t);
ReadLn
End.

В строке №3 записываем имя константы, которое придумываем сами. Например, назовем константу латинской буквой «t». Затем присваиваем константе значение $f. «f» в шестнадцатеричной системе счисления имеет значение 15.
В строке №6 выводим значение константы на экран.

Дополнение к материалу.

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