Case

Оператор Case состоит из выражения (селектора) и списка операторов, каждый из которых выполнится в определенном случае.

Синтаксис

Case выражение Of
  вариант : оператор;
  ...
  вариант : оператор;
End

или

Case выражение Of
  вариант : оператор;
  ...
  вариант : оператор;
Else оператор
End

"Вариант" состоит из одной или большего количества констант или диапазонов, разделенных запятыми.

Примеры
 Case Ch Of
   'A'..'Z', 'a'..'z' : WriteLn('Буква');
   '0'..'9'           : WriteLn('Цифра');
   '+', '-', '*', '/' : WriteLn('Оператор');
 Else WriteLn('Специальный символ')
 End;