with Ada.Text_IO;
procedure Hello is
begin
   Ada.Text_IO.Put_Line ("Hello from Ada.");
end Hello;