bug0036.pp 161 B

123456789
  1. program bug0036;
  2. {Discovered by Daniel Mantione.}
  3. var a:array[0..31] of char;
  4. begin
  5. a:=' '; {Incorrect Pascal statement, but why a protection error?}
  6. end.