code-examples/2015/2015_03/ada/nauka/3/hello.adb

with Ada.Text_IO;
use Ada.Text_IO;

procedure Hello is
    package IO renames Ada.Text_IO;
begin
    Put_Line("Hello, world");
end Hello;