bug0056.pp 176 B

1234567891011121314
  1. PROGRAM ShowBug;
  2. (* This will compile
  3. VAR N, E: Integer;*)
  4. (* This will NOT compile*)
  5. VAR N, E: LongInt;
  6. BEGIN
  7. E := 2;
  8. WriteLn(E);
  9. N := 44 - E;
  10. WriteLn(N);
  11. END.