  | 
 
2.12 Beispiel für ein Ada-Programm
 
  
Das folgende Beispiel stellt ein vollständiges, wenn auch einfaches Ada 
Hauptprogramm dar.
  
with Ada.Text_IO;  
-- Kontextklauseln, geben die Verbindung zu anderen Übersetzungseinheiten 
an 
procedure Test is 
   -- Vereinbarungsteil  
   -- hier werden lokale Typen, Objekte und Programmeinheiten vereinbart 
 
   Text: constant STRING(1..48) := "Einen schönen Gruß 
wünscht Ihnen Ihr Ada-System"; 
begin 
   -- Ablaufteil oder auch Anweisungsteil genannt  
   -- hier beginnt die sequentielle Abarbeitung der Anweisung  
   Ada.Text_IO.Put_Line(Text); 
   -- Aufruf der Prozedur 'PutLine(...)' aus der Bibliothek 'Text_IO', 
 
   -- welches sich in der Bibliothek 'Ada' befindet; 
   -- Der Zugriff auf den Inhalt einer Bibliothek erfolgt durch 
Qualifizierung mittels '.'  
end Test; | 
 
 
 
 
 
 
 |