Лекция 3. Структурированные операторы

Оператор выбора CASE

Синтаксис.

CASE OF.

:;

:;

• • •.

:;

:

[ELSE.

].

END.

Выражение может быть только порядкового типа. В списках значений через запятую указываются константы или интервалы значений. Если значение выражения находится в одном из списков значений, выполняется соответствующий оператор. Одно и то же значение не может находиться в нескольких списках (если рассматривать Delphi, так как в других версиях языка Паскаль это иногда допускается, при этом выполняется только первый из операторов, для которого значение — в списке). Если значение выражения не содержится ни в одном из списков и присутствует раздел ELSE, то выполняется список операторов. После последнего оператора перед ELSE и перед END точку с запятой ставить не обязательно, но допускается.

Пример

CASE S[n] OF.

'0'.'9':WriteLn ('Цифра');

'A'.'Z','a'.'z':WriteLn ('Буква');

'+','-','*','/':WriteLn ('Операция');

ELSE.

WriteLn ('Неизвестный символ');

END;

Оператор цикла FOR

Синтаксис.

FOR := {TO | DOWNTO} DO.

Алгоритм действия оператора FOR для фраз TO/DOWNTO.

• 1. Вычислить начальное и конечное значения переменной цикла (выражения 1 и 2).
• 2. Присвоить переменной цикла начальное значение.
• 3. Если значение переменной не больше/меньше конечного значения, то

А. Выполнить оператор.

Б. Изменить значение переменной цикла на следующее/предыдущее.

В. Перейти к шагу 3.

4. Конец оператора.

Действия, выполняемые на шаге 3. Б (изменение значения переменной цикла на следующее или предыдущее), требуют, чтобы, и переменная цикла имели одинаковый порядковый тип, так как такие действия определены только для порядковых типов. Если использована фраза TO и начальное значение больше конечного, либо фраза DOWNTO и начальное значение меньше конечного, то оператор не будет выполнен ни разу. После выполнения цикла значение переменной цикла изменяется и не должно использоваться.

Пример

FOR n:=1 TO 10 DO.

WriteLn ('n=', n);

Результат выполнения.

n=1.

n=2.

.. .

n=10.