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 的引數。

其他編譯器也有類似的要求，當然構建命令也不同。