Hello World

with Ada.Text_IO;

procedure Hello_World is
begin
   Ada.Text_IO.Put_Line ("Hello World");
end Hello_World;

或者，在导入包 Ada.Text_IO 之后 ，你可以说 use Ada.Text_IO; 是为了能够使用 Put_Line而不明确声明它应该来自哪个包，因此：

with Ada.Text_IO; use Ada.Text_IO;

procedure Hello_World is
begin
    Put_Line ("Hello World");
end Hello_World;

如果你使用的是 gnat 编译器，可以使用这个简单的程序进行编译

gnatmake hello_world

这将生成许多文件，包括可以执行以查看着名消息的 hello_world（或 Windows 上的 hello_world.exe）。可执行文件的名称是从主 Ada 子程序的名称自动计算的。在 Ada 中，主子程序可以有任何名称。它只需要是一个无参数的过程，你作为 gnatmake 的参数。

其他编译器也有类似的要求，当然构建命令也不同。