Мельница данных  (30.11.2022)
Оператор выбора
1 case Выражение of
2  Значение1: //Оператор1
3  Значение2: //Оператор2
4  ...
5[else
6  //Оператор ]
end 

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

Пример
1сase LIndex of
2  0: ZeroIndex;
3  1,2,3: SmallIndex;
4  4,5,6,7,8,9,10: BigIndex;
5else
6  raise 'Слишком большой или отрицательный индекс.';
7end;