home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / l / l074 / 1.ddi / INVNTORY.TRU < prev    next >
Encoding:
Text File  |  1984-12-19  |  356 b   |  16 lines
  1. ! Inventory for 5 items.
  2. !
  3. READ item1$, number1
  4. READ item2$, number2
  5. READ item3$, number3
  6. READ item4$, number4
  7. READ item5$, number5
  8.  
  9. PRINT "You have these items:"
  10. PRINT item1$, item2$, item3$, item4$, item5$
  11. PRINT number1, number2, number3, number4, number5
  12.  
  13. DATA hammers, 4, umbrellas, 2, wood stoves, 1
  14. DATA bags of salt, 4, pliers, 2
  15. END
  16.