Ideone.com

download

copy

with Ada.Text_IO;
use Ada.Text_IO;
 
procedure Program is
begin
  for I in 1 .. 10 loop
    Put_Line ("Hello");
  end loop;
end Program;

Success #stdin #stdout 0s 5760KB

stdin

copy

Standard input is empty

stdout

copy

Hello
Hello
Hello
Hello
Hello
Hello
Hello
Hello
Hello
Hello

https://ideone.com/9xC8us

language:

Ada95 (gnat 8.3)

created:

visibility:

public

Share or Embed source code

The brand new service which powers Ideone!

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