Лекция: Оператор выбора Case.

Условный оператор IF служит для организации процесса вычислений (изменения последовательности выполнения операторов) в зависимости от какого-либо логического условия.

Синтаксис оператора IF:

IFУсловиеTHENОператор1ELSEОператор2;

или

IFУсловиеTHENОператор;

Условие может быть представлено логической константой (FALSE – ложь, TRUE — истина), переменной логического типа (Boolean) или логическим выражением.

Если условие истинно, то выполняется оператор (простой или составной), следующий за словом THEN, в противном случае, когда условие ложно, будет выполняться оператор, следующий за словом ELSE. Альтернативная ветвь ELSE может отсутствовать, если в ней нет необходимости. В таком “усеченном” варианте, в случае, если условие оказывается ложным, ничего не происходит и выполняется оператор следующий за условным оператором IF.

Или

Данный оператор служит для выбора одного из возможных вариантов в ситуации, которая может иметь несколько (более двух) возможных исходов. В зависимости от значения переменой выполняется оператор, помеченный соответствующей константой. Если же ни одна константа не подходит, выполняется оператор, записанный после else.
Оператор case имеет следующий формат:

Case порядковая_переменная of
Значение_1: оператор_1;
Значение_2: оператор_2;
…
Значение_n: оператор_n;
Else оператор;
End;

Возможно использование сокращенной формы оператора case, в которой строка else отсутствует. В этом случае, если ни одно значение не совпадает со значением порядковой переменой, управление передается оператору, следующему за end.

Если для нескольких значений, нужно выполнять один и тот же оператор, их можно перечислять через запятую, или указать диапазон

Пример1

Case i of

1,3,5,7:Writeln('Нечетныецифры');

2,4,6,8:Writeln('Четные цифры');

10..100: Writeln('Цифры от 10 до 100');

End;