fork download 
  1. With Ada.Text_IO; Use Ada.Text_IO;  
  2. With Ada.Integer_Text_IO; Use Ada.Integer_Text_IO;
  3.  
  4. procedure Program is
  5.    a, b, c : INTEGER := INTEGER'LAST;
  6. begin
  7.    Put(a); New_Line;
  8.    Put(b); New_Line;
  9.    Put(c); New_Line;
  10. end Program;
Success #stdin #stdout 0s 4704KB
comments (?)
stdin 
Standard input is empty
stdout 
 2147483647
 2147483647
 2147483647
https://ideone.com/26IGLZ
language:
Ada95 (gnat 8.3)
created:
3 years ago
visibility:
secret

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!