Информатика. Программирование в 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
          
        
        
          можно не писать.