home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / CLIPPER / MISC / ESIE.ZIP / HEIGHT < prev    next >
Encoding:
Text File  |  1986-07-05  |  719 b   |  36 lines
  1. introtext is "
  2.  
  3.          HI THERE!!!!!  This Artificially Intelligent computer program 
  4.          will give you an estimate of how tall you are compared with 
  5.          other humans. 
  6.  
  7. "
  8. goal is type.height
  9.  
  10. if height < 50
  11. then type.height is short
  12.  
  13. if height < 60
  14. then type.height is medium.short
  15.  
  16. if height < 65
  17. then type.height is medium
  18.          
  19. if height < 70
  20. then type.height is medium.tall
  21.          
  22. if height > 69 then
  23. type.height is tall
  24.  
  25. question height is
  26. "
  27.          Hi!!  Please be good enough to tell me how tall you are, in 
  28.          inches.  Please give me your answer in whole numbers only.
  29. "
  30.  
  31. answer is "You must be " type.height
  32.  
  33. termtext is "
  34.          Thank you!!
  35. "
  36.