1 2 3 4 5 6 7 8
with Ada.Text_IO; use Ada.Text_IO; procedure Hello is begin Put_Line("Hello, World!"); end Hello;