The Ada Program: hello.adb

  1 -- hello.adb:  simple main program with string constants
  2 
  3 with Ada.Text_IO, Ada.Characters.Latin_1;
  4 use Ada, Ada.Characters;
  5 
  6 procedure Hello is
  7    Name       : constant String := "Stansifer, Ryan";
  8    Student_Id : constant String := "XXX-YY-ZZZZ";
  9    E_Mail     : constant String := "ryan@cs.fit.edu";
 10    Tab        : Character renames Latin_1.HT;
 11 begin
 12    Text_IO.Put_Line (Name & Tab & Student_Id & Tab & E_Mail);
 13 end Hello;