Sale Calc

Date: 198x
Type: Program
Platform(s): TS 1000

Appears on

Assembled by Tim Ward from many sources. Contains programs 10122 – 10175.

Gallery

Sale Calc

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 

People

No people associated with this content.

Scroll to Top