RosettaCodeData/Task/Hello-world-Text/Delphi/hello-world-text.pas

program ProjectGoodbye;
{$APPTYPE CONSOLE}
begin
  WriteLn('Hello world!');
end.