home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / l / l210 / 1.ddi / EXAMPLES.ARC / CH12EX06.PRO < prev    next >
Encoding:
Text File  |  1988-06-21  |  694 b   |  20 lines
  1. /*
  2.    Turbo Prolog 2.0 Chapter 12, Example Program 6
  3.       
  4.    Copyright (c) 1986, 88 by Borland International, Inc
  5.    
  6. */
  7.    
  8. goal
  9.    person(N, A, I),
  10.    /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
  11.     *                                    *
  12.     *   Name    is left-justified, at least 15 characters wide    *
  13.     *   Age    is right-justified, 2 characters wide             *
  14.     *   Income    is right-justified, 9 characters wide, with 2     *
  15.     *          decimal places, printed in fixed-decimal          *
  16.     *          notation                      *
  17.     *                                  *
  18.     * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
  19.     
  20.     writef("Name= %-15, Age= %2, Income= $%9.2f \n",N,A,I).