tw1251a.pp 169 B

123456789101112
  1. { %FAIL }
  2. {$mode objfpc}
  3. begin
  4. try
  5. writeln ('Start: create game object');
  6. except
  7. on e : exception do
  8. writeln ('Exception: ', e.message);
  9. end;
  10. end.