a_bad_arr.mod 74 B

123456
  1. MODULE ABadArr;
  2. VAR x : INTEGER;
  3. BEGIN
  4. x := 1;
  5. x[1] := 5
  6. END ABadArr.