Вариант 1:
case Выражение of
Список_констант1: begin
{ Инструкции 1 } end; Список_констант2: begin
{ Инструкции 2 } end;
Список_коистантЗ: begin
{ Инструкции 3 } end; end;
Вариант 2:
case Выражение of
Список_констант1: begin
{ Инструкции 1 } end; Список_констант2: begin
{ Инструкции 2 } end;
CnncoK_KOHCTaHTj: begin
{ Инструкции J } end else begin
{ Инструкции } end; end;
Инструкции между begin и end выполняются в том случае, если значение выражения после слова case совпадает с константой из соответствующего списка. Если это не так, то выполняются инструкции, следующие после else, расположенные между begin И end..