Оператор множественного выбора в языке Паскаль.

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

Синтаксис:

Case <селектор> of

               <константа выбора1> : <оператор1>;

               …

               < константа выбораN > : <операторN>;

                              [else <оператор>;]

               end;

Селектор должен иметь порядковый тип!

Пример:      Case I of

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

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

        10..100: Writeln('Между 10 и 100');

  else

        Writeln(‘Цифра вне диапазона 0-100');

  End;