http://www.adaconcept.com/programs/separate/separate_eljarasos_program.adb
with Ada.Text_IO;

procedure separate_eljarasos_program is

   I : Integer := 2#0000_0111#;

   procedure Szamot_Kiir is separate;            -- figyeljuk meg, hogy nincs parametere az eljarasnak

begin
   Ada.Text_IO.Put_Line("Program indul");

   Szamot_Kiir;

   Ada.Text_IO.Put_Line("Program vege");
end separate_eljarasos_program;