Ada — δείγμα κώδικα — DedSec Project

with Ada.Text_IO; use Ada.Text_IO; procedure Hello is begin Put_Line("Hello, Ada!"); end Hello;

Αναφορά πηγαίου κώδικα

with Ada.Text_IO; use Ada.Text_IO;
procedure Hello is
begin
   Put_Line("Hello, Ada!");
end Hello;