Procedure Gnat.Io.A is begin Put("Hello World!");End;