with Ada.Text_IO;
procedure hello_world is
begin
Ada.Text_IO.Put_Line("Hello, world.");
Ada.Text_IO.Put("Now, goodbye.");
Ada.Text_IO.New_Line;
end hello_world;