Pascal Next – руководство программиста. Описание языка программирования с примерами

Метка представляет собой любую начинающуюся буквой и состоящую из букв и цифр строку.

Метка записывается перед инструкцией, к которой надо выполнить переход, и отделяется от этой инструкции двоеточием.

Метка должна быть объявлена в разделе объявления меток в той процедуре или функции, в которой она используется. Начало раздела объявления меток помечает ключевое слово label.

Раздел объявления меток предшествует разделу объявления констант или, если раздел const отсутствует, разделу объявления переменных.

Пример:

// вычисление наибольшего общего делителя (НОД)

// двух целых положительных чисел

program p1 ()

label   // раздел объявления меток

m1,m2; // метки

var

a,b: integer; // числа

n: integer; // НОД

begin

a:=12;

b:=18;

writeln (? a=?,a:2,?  b=?,b:2);

m1: if a = b then

n:=a;

goto m2;

end;

if a> b then

a:= a-b;

goto m1;

else

b:= b-a;

goto m1;

end;

m2: writeln (? Наибольший общий делитель:?, n);

write (? Press  ?);

readln;

end.

Массивы

Одномерный массив

Объявление одномерного массива в общем виде выглядит так:

имя: array [1..HB] of тип;

где:

имя – имя массива

HB – верхняя граница диапазона индекса массива (количество элементов массива)

тип – тип элементов массива (тип массива)

Внимание! Максимальное допустимое количество элементов одномерного массива 255

Примеры:

Salary: array [1.

.15] of float; // массив вещественных чисел

nPacients: array [1..31] of integer; // массив целых чисел

Students: array [1..25] of strings [15]; // массив строк

Допускается одной инструкцией объявить несколько массивов одинакового типа и размера, например:

// три массива целых чисел

gold, silver, bronze: array [1..10] of integer;

// два массива строк

students_1, students_2: array [1.. 30] of string [25];

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

Например, если в разделе const объявлены целые именованные константы HB и NL, то объявление массива students может быть таким:

Students: array [1..HB] of strings [NL];

Именованные константы, использованные в инструкции объявления массива, удобно использовать в инструкциях его обработки.