Hall of Fame/HallofFameCDROM.cdr/prog1/ada-tutr.lzh/ADD.ADA

Text File | 1988-12-21 | 158b | 8 lines

with TEXT_IO; use TEXT_IO;
procedure ADD is
   package MY_INT_IO is new INTEGER_IO(INTEGER); use MY_INT_IO;
begin
   PUT(2 + 2);
   NEW_LINE;
end ADD;