fork download 
  1. with Text_IO; use Text_IO;
  2. procedure Hello is
  3. begin
  4.   Put_Line("Hello!");
  5. end Hello;
Success #stdin #stdout 0.01s 1716KB
comments (?)
stdin 
21
stdout 
Hello!
https://ideone.com/1VjR6
language:
Ada95 (gnat 8.3)
created:
14 years ago
visibility:
public

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!