home *** CD-ROM | disk | FTP | other *** search
/ Chip 1995 March / CHIP3.mdf / programm / prog2 / answers / ch02_1.ada next >
Encoding:
Text File  |  1991-07-01  |  217 b   |  18 lines
  1.                             -- Chapter 2 - Programming Exercise 1
  2. with Text_IO;
  3. use Text_IO;
  4.  
  5. procedure Ch02_1 is
  6.  
  7. begin
  8.    Put("John Q. Doe");
  9. end Ch02_1;
  10.  
  11.  
  12.  
  13.  
  14. -- Result of execution
  15.  
  16. -- John Q. Doe
  17.  
  18.