10  DIM item$(5), number(5,3)

20  FOR k% = 1 to 5

30    READ item$(k%)

33    FOR j% = 1 to 3

35      READ number(k%,j%)

36    NEXT j%

40  NEXT k%

45  FOR j% = 1 to 3

50      LPRINT "You have these items:"

60      FOR k% = 1 to 5

70         LPRINT item$(k%), number(k%,j%)

80      NEXT k%

85  Next j%

90  DATA hammers,4,5,6,umbrellas,2,3,4,wood_stoves,1,2,3

100 DATA bags_of_salt,4,5,6,pliers,2,3,4

110 END