Оператор выбора имеет следующий формат:
case выражение - переключатель of
список выбора 1: оператор1;
...
список выбора N: операторN;
else оператор0
end;
