[destructor]

такое умееш компилить?

program firststep;
begin
  writeln('hello world');
end;