Category : Miscellaneous Language Source Code
Archive   : ADATUT12.ZIP
Filename : ADD.ADA

 
Output of file : ADD.ADA contained in archive : ADATUT12.ZIP

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;