Adaをつつくー基礎も大事。はじめましてAda。
with Ada.Text_Io; use Ada.Text_Io;
with Ada.Integer_Text_IO;
procedure Hello is
begin
Put_Line ( "hello indori" );
for count in 0 .. 9
loop
Ada.Integer_Text_IO.Put(count, Width => 1);
Put ( ' ' );
end loop;
Put_Line ( "" );
Put_Line ( "good-by" );
end Hello;