with Ada.Text_IO;

  procedure Hello is
  begin
    Ada.Text_IO.Put_Line("Hello, World!");
  end Hello;