Почетна Преглед Помоћ
Пријавите се
eric
/
CocoR
1
0
Креирај огранак 0
Датотеке Дискусије 0 Захтеви за спајање 0 Вики
Грана: master
Гране Ознаке
CocoR
/
Test1
/
tests
/
t_bad_caselabel.mod

t_bad_caselabel.mod 98 B
Пермалинк Историја Датотека

1234 
  1. MODULE TCase;
    2. 

  2. VAR b : BOOLEAN; x : INTEGER;
    3. 

  3. BEGIN CASE b OF 1 : x := 1 ELSE x := 2 END
    4. 

  4. END TCase.
    5.