with Ada.Text_IO;

procedure newHello is

begin

Ada.Text_IO.put (" Good afternoon to you all");

end newHello;