Appears on
Assembled by Tim Ward from many sources. Contains programs 10122 – 10175.
Source Code
5 REM SALE CALC 10 PRINT "ENTER PRODUCT NAME" 11 INPUT N$ 12 PRINT N$ 20 PRINT "ENTER PRICE" 21 INPUT P 22 PRINT P 30 PRINT "ENTER UNITS SOLD" 31 INPUT U 32 PRINT U 33 LET T=.0525*P 40 LET ST=P*U+T 60 PRINT "PRODUCT ";N$, 70 PRINT "PRICE ";P 80 PRINT "UNITS SOLD ";U 90 PRINT "TOTAL SALE= ";ST 100 STOP 110 SAVE "1012%9" 120 RUN