Информатика. Программирование в Delphi
351
Инструкция case
Вариант 1.
case Выражение of
Список1_Констант: begin
{ инструкции }
end;
Список2_Констант: begin
{ инструкции }
end;
СписокJ_Koнстант: begin
{ инструкции }
end;
end ;
Вариант 2.
case Выражение of
Список1_Констант: begin
{ инструкции }
end;
Список2_Констант: begin
{ инструкции }
end
СписокJ_Констант: begin
{ инструкции }
end;
else
begin
{ инструкции }
end;
end;
Инструкции между
begin
и
end
выполняются, если значение выражения,
записанного после
case
, совпадает с константой из соответствующего списка.
Если это не так, то выполняются инструкции, находящиеся после
else
, между
begin
и
end
.
Если между
begin
и
end
находится только одна инструкция, то слова
begin
и|
end
можно не писать.
I...,341,342,343,344,345,346,347,348,349,350 352,353,354,355,356,357,358,359,360,361,...370