1.2 Раздел констант (const)

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

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

1.) Целые числа. Они записываются со знаком или без знака и могут иметь значение от – 2 147 483 648 до + 2 147 483 647. Если константа имеет значение, выходящее за эти пределы, то в качестве значения константы необходимо использовать вещественные числа.

2.) Вещественные числа записываются со знаком или без знака с использованием десятичной точки или экспоненциальной части, которая начинается с символа «e», за которым следует десятичный порядок. Например, запись 3.14e5 означает 3,14*105. А запись – 3.14e-4 означает – 3,14*10-4.

3.) Шестнадцатеричные числа, которые состоят из шестнадцатеричных цифр со знаком доллара «$» впереди. Диапазон шестнадцатеричных чисел — от $00000000 до $FFFFFFFF.

Пример

program number25;

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.

1.3 Раздел типов (type)

Раздел типов начинается с оператора type, за которым следуют разделённые точкой с запятой определения типов. Определение каждого типа начинается с его имени, далее ставится знак равенства. Оставшаяся часть определения типа зависит от самого типа и не может быть описана единообразно. Простейший вариант определения типа - определение синонимичного типа, то есть типа-синонима другого типа. В определении синонимичного типа после знака равенства пишется существующий синоним этого типа: type TBase=real;

В остальных случаях определяется действительно новый тип, тогда после знака равенства пишется описание определяемого типа. Сначала рассмотрю определение ограниченного числового типа. Описание такого типа состоит из минимального и максимального допустимых значений и двух точек (не двоеточия) между ними, причём, первым указывается именно минимальное допустимое значение: type TIndex=1..10;

Пример программы с типом записи:

program project1;

type TDate=record

Day:integer;

Moth:integer;

Year:integer;

end;

var Date:TDate;

begin

write('Day='); readln(Date.Day);

write('Month='); readln(Date.Month);

write('Year='); readln(Date.Year);

writeln('Day=',Date.Day);

writeln('Month=',Date.Month);

writeln('Year=',Date.Year);

end.

1.4 Раздел переменных (var)

Пусть в программе встречаются переменные v11, v12,…; все они должны быть описаны следующим образом:

var v11, v12,…: type1;

v21, v22,…: type2; …

здесь v11, v12,… - имена переменных; type1 – тип переменных v11, v12,…; type2 – тип переменных v21, v22,….

Пример. var k, i, j: integer; a, b: real;

Каждая переменная должна быть описана до ее использования в программе и отнесена к одному и только одному типу. Названия разделов (const, type, var…) указываются только один раз.

Пример. 

var a:real;

b:real;

Таким образом, в разделе var вводится имя каждой переменной и указывается, к какому типу эта переменная принадлежит. Тип переменной можно задать двумя способами: указать имя типа (например, real, color и т.д.), либо описать сам тип, например: array[1..16] ofchar