OS/2 Shareware BBS: 10 Tools/10-Tools.zip/adapm_15.zip/hello.adb

Text File | 1994-02-28 | 123b | 7 lines

With Text_Io;
procedure Hello is
  Num : Integer := 1;
begin
  Text_Io.Put_Line ("Hi " & Integer'Image (Num));
end;