Пример использования оператора case
Листинг 3.4. Пример использования оператора case
case I of // В зависимости от значения переменной I
1..5: С := 'До пяти'; // Если оно от 1 до 5, то переменная С='До пяти' 6..9: С := 'Выше пяти'; // Если оно от б до 9, то переменная С='Выше
// пяти' 0, 10..99: С := 'Вне области допустимых значений'; // Если оно равно 0
// или от 10 до 99, то С='Вне области допустимых значений' else
С := ''; // Иначе, если ни одно из условий не выполняется,
//С равно пустой строке end;
Таким образом, мы с помощью одного оператора case охватили множество значений. Более того, код программы читается довольно легко. Посмотрим, что было бы, если бы для той же самой задачи мы использовали оператор условия (листинг 3.5).
