Оператор выбора. Оператор выбора является обобщением условного оператора и позволяет сделать выбор из произвольного числа имеющихся вариантов

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

Формат оператора выбора:

case <Выражение-селектор> of

<Список1>: <Оператор1>;

<CпиcoкN>: <OпepaтopN>

else <Оператор>;

end;

Выражение–селектор должно быть порядкового типа. Каждый вариант представляет собой список констант, отделенных двоеточием от относящегося к данному варианту оператора, возможно, составного. Список констант выбора состоит из произвольного количества значений и диапазонов, отделенных друг от друга запятыми. Границы диапазона записываются двумя константами через разделитель ".. ". Тип констант должен совпадать с типом выражения–селектора.

Оператор выбора выполняется следующим образом:

— вычисляется значение выражения–селектора;

— производится последовательный просмотр вариантов на предмет совпадения значения селектора с константами и значениями из диапазонов соответствующего списка;

— если для очередного варианта этот поиск успешный, то выполняется оператор этого варианта. После этого выполнение оператора выбора заканчивается;

— если все проверки оказались безуспешными, то выполняется оператор, стоящий после слова else (при его наличии).

Пример. Оператор выбора.

case DayNumber of

1.. 5: strDay:= 'Рабочий день';

6, 7: strDay:= 'Выходной день'

else strDay:= '';

end;

В зависимости от значения целочисленной переменной DayNumber, содержащей номер дня недели, присваивается соответствующее значение строковой переменной strDay.