Payroll

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

Appears on

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

Gallery

Payroll

Source Code

   1 REM PAYROLL
  10 PRINT "ENTER HOURS WORKED"
  11 INPUT H
  12 PRINT H
  15 IF H<0 THEN GOTO 70
  20 IF H>40 THEN GOTO 50
  30 LET P=7*H
  40 GOTO 60
  50 LET P=7*40+1.5*7*(H-40)
  60 PRINT "PAY IS:$ ";P
  65 GOTO 10
  70 STOP 
  80 SAVE "1012%6"
  90 RUN 

People

No people associated with this content.

Scroll to Top