Раздел 3.3.4. Оператор выбора

Иногда требуется осуществить выбор более чем из двух условий. В этом случае применяется оператор множественного выбора, позволяющий выбрать из списка одно из условий.
Оператор выбора выполняет одно действие из нескольких в зависимости от значения некоторого выражения, называемого переключателем. Он имеет следующий вид:

case переключатель of
список выбора 1: оператор1;
...
список выбора N: операторN;
else оператор0
end;

Переключатель представляет собой выражение порядкового типа (целого, символьного, перечислимого или интервального), а списки выбора содержат константы совместимого типа. Как и в операторе if, ветвь else может отсутствовать.

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

Список выбора состоит либо из одной константы, либо из диапазона значений вида a..b (константа a должна быть меньше константы b). Можно также перечислить несколько констант или диапазонов через запятую:

case DayOfWeek of
1..5: writeln('Рабочий день');
6,7: writeln('Выходной');
end;

В списках выбора диапазоны меток не должны пересекаться. Например, в результате выполнения следующего фрагмента:

case i of
1,5: write(1);
4..9: write(2);
end;

программа завершится сообщением об ошибке:

" Ошибка: Пересечение диапазонов меток в операторе case ".