assign6/controlerrors.txt

   1 BEGIN\r
   2     REPEAT UNTIL five := 5;\r
   3     REPEAT ratio := 9 UNTIL;\r
   4 \r
   5     WHILE DO five := 5;\r
   6     WHILE five = 5 five := 5 UNTIL ratio = 9;\r
   7 \r
   8     FOR i = 1 TO 10 DO five = 5;\r
   9     FOR i := 1, 10 DO five := 5;\r
  10 \r
  11     IF five = 5;\r
  12     IF five = 5 ELSE ratio := 9;\r
  13     IF five = 5 ELSE ratio := 9 THEN ratio := 7;\r
  14 \r
  15     CASE five OF\r
  16         1 2 3 : five := 5\r
  17         4,5     IF five = 5 THEN ratio := 9;\r
  18     END;\r
  19 END.\r