Programmer 7500/MAX_PROGRAMMERS.iso/INFO/ADA/ADA_TUTR.ZIP/ADD.ADA

Text File | 1988-03-25 | 158 b | 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;