RosettaCodeData/Task/Exceptions/PascalABC.NET/exceptions-1.pas

type MyException = class(Exception) end;