Pascal Next. Руководство программиста

Никита Борисович Культин, 2023

Книга представляет собой описание нового языка программирования Pascal Next, в основе которого лежит классический Pascal. Содержит примеры программ, демонстрирующие возможности языка программирования: операции ввода-вывода, использование циклов, работу с массивами, строками, файлами, встроенными и пользовательскими функциями. Книга адресована тем, кто интересуется программированием, знаком с основами программирования, знает с какой-либо язык программирования и имеет навык разработки компьютерных программ начального уровня. Также она будет весьма полезна учителям школ, преподавателям техникумов и вузов, читающим лекции и ведущим практические занятия по дисциплинам Информатика, Программирование, Алгоритмизация и программирование, Теория и технологии программирования.

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

В 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;

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 <Enter>');

readln;

end.