СТРУКТУРИРОВАННЫЕ ОПЕРАТОРЫ

К структурированным операторам в PASCAL 7.0 относятся:

■ составной оператор BEGIN END;

■ условный оператор IF... THEN;

■ оператор выбора CASE... OF;

■ оператор цикла FOR... DO;

■ оператор цикла REPEAT... UNTIL;

■ оператор цикла WHILE... DO;

■ оператор над записями WITH.

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

Условный оператор IF... THEN. Условный оператор позволяет исполнять те или иные действия в зависимости от выполнения логического условия. Предлагается использовать два таких опера­тора: IF F THEN <оператор 1>;;и IF F THEN <оператор 1> ELSE <оператор 2>;;

В первом случае, при истинности логического условия F, вы­полняется оператор 1. Альтернативная конструкция отсутствует и заменена точкой с запятой, т. е., если условие ложно, ничто не выполняется.

Во втором случае, при истинности логического условия F, так­же выполняется оператор 1, в противном случае - оператор 2.

Например, чтобы определить, являются ли введенные 3 числа А, В, С углами треугольника, нужно записать:

IF (A>0) AND (B>0) AND (C>0) AND (A+B+C = 180)

THEN WRITELN('ЯВЛЯЮТСЯ УГЛАМИ ТРЕУГОЛЬНИКА')

ELSE WRITELN('HE ЯВЛЯЮТСЯ УГЛАМИ ТРЕУГОЛЬНИКА');

Оператор выбора CASE... OF. С помощью оператора CASE можно выбрать любой вариант из допустимых значений перемен­ной. Он имеет следующую структуру: