LABEL 1, 4.00, M1, EPS;

если метка описана в этом блоке, но в программе не встретилась, то вы­дается сообщение об ошибке. Метки не должны повторяться. Блок меток может находиться в любом месте, их может быть несколько, но все метки должны быть определены до начала основной программы. При отсутствии меток блок исключается.

Блок CONST описывает константы двух видов:

CONST <имя1>=<константа1>; или CONST <имяК>:<тип>=<константаK>;

<имя2>=<константа2>; <имяR>:<тип>=<константаR>;

......

Например: CONST

NI=100;

f= -NI;

d: real=7.65432;

Значения констант определенных в этом блоке первым способом (сле­ва) в программе изменять нельзя. Типизированным же константам, задан­ным вторым способом (справа), можно переприсваивать другие значения в ходе выполнения программы.

Блок TYPE содержит определения вводимых программистом нестандарт­ных типов в следующих формах

TYPE <идентификатор>=(список_компонентов);

или

TYPE идентификатор>=<описание_типа>или<имя_другого_типа>;

Пример: TYPE FAMILY=(FATHER, MOTHER);

Если в Паскале используются только стандартные типы (например: INTEGER, REAL), то этот блок опускается.

Блок VAR описывает имена переменных, а также имена массивов:

VAR A1, A2,..., An: <тип1>;

B1, B2,..., Bn: <типК>;

...

<имя массива>: ARRAY[диапазон] OF <тип>;

где буквами Ai, Bj указаны имена переменных, а <тип1>, <типК> – типы соответствующих переменных, [диапазон] указывает начальное и конечное значения индексов массива, <тип> задает тип элементов массива.

Пример: VAR

A, B, C: INTEGER; {объявлены три переменные целого типа}

D, M: REAL; {объявлены две вещественные переменные}

MASS1: ARRAY[1..10] OF REAL; {массив из 10 чисел}

MASS2: ARRAY[-2..2] OF CHAR; {массив из пяти символов}

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

Основной блок программы начинается с ключевого слова BEGIN и за­канчивается END, после которого ставится точка. Основной блок содержит программу из выполняемых операторов, в которой используется то, что было объявлено и описано в разделе описаний.

Пример программы, явно преобразующей вещественные числа в целые:

PROGRAM INTRЕAL;

VAR A,B,C:INTEGER;

X,Y,Z:REAL;

BEGIN

READ(X,Y);

Z:=Y+X;

A:=TRUNС(Z); {выделение целой части }

B:=ROUND(Z); (* округление *)

C:=B-A;

WRITELN('Z=', Z, 'A=', A, 'B=', B, 'C=', C);

END.

Длина строки в программе не может превышать 126 символов. Объем текста в файле с программой не должен быть более 64 Кб.

Любой блок программы может содержать комментарий.

Комментарий - это произвольная последовательность любых символов, обрамленная фигурными скобками или парами символов (* и *). Коммента­рий разрешается вставлять в любое место программы, где по смыслу может стоять пробел.

Существует некоторое ограничение на размещение блоков. Программа компилируется последовательно, поэтому то что используется в програм­ме или подпрограммме, должно быть определено выше.

Дата добавления: 2015-09-05