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

Никита Культин

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

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

В 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 <Enter> ́);

readln;

end.