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

HB] of string [NL];

name: string [NL];

Пример использования именованных констант в коде:

sq:= PI*r*r; // PI – именованная константа

for i:=1 to HB do// HB – именованная константа

for j:=1 to HB do

matrix [i, j]:=0;

end;

end;

Логический тип

В Pascal Next нет логического (boolean) типа данных, однако, его легко можно смоделировать, определив в программе целые именованные константы TRUE (истина) и FALSE (ложь) со значениями 1 и 0 соответственно. После этого, вместо переменных логического типа можно использовать переменные целого типа, трактуя их как логические.

Пример

program p ()

const

// «логические» константы

TRUE = 1;

FALSE = 0;

HB = 10;

var

a: array [1..HB] of integer; // массив чисел

r: integer; // число, которое надо найти в массиве

found: integer; // признак, что число есть в массиве (найдено)

i: integer;

begin

for i:= 1 to HB do

a [i]:= Random (HB);

end;

write (? Number list: ?);

for i:= 1 to HB-1 do

a [i]:= Random (HB);

write (a [i]:3,?,?);

end;

write (a [HB]:3);

r:= Random (HB);

writeln (? Search: ?,r);

found:= FALSE; // пусть число не найдено

i:= 1;

repeat

if a [i] = r then

found:= TRUE; // число найдено

else

i:=i+1;

end;

until (found = TRUE) OR (i> HB);

if found = TRUE then

writeln (? Found!?);

else

writeln (? Not found!?);

end;

write (? Press  ?);

readln;

end.

Вывод в окно консоли

Вывод информации на экран (в окно консоли) выполняют инструкции write и writeln.

В общем виде инструкции вывода информации в окно консоли записываются так:

write (список_вывода);

writeln (список_вывода);

где:

список_вывода – разделенные запятыми имена переменных, строковые константы или выражения.

Примеры:

write (sum);

write (? Press  ?);

writeln (? x1=?, x1, ? x2=?, x2);

writeln (pound,? фунтов =?, pound*0.453, ? кг.?);

Форматированный вывод

В строке вывода после имени переменной или выражения через двоеточие можно задать формат вывода значения.

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

В общем виде форматированный вывод целых и строковых значений задается так:

имя: n

где:

имя – имя переменной, значение которой надо вывести на экран;

n – ширина поля вывода (целая константа).