with Ada.Text_IO; use Ada.Text_IO; procedure Hello is begin Put_Line ("Hello, World!!!"); Put_Line ("Scritto in Ada..."); Put_Line ("By Willthekid..."); end Hello;