100 CALL CLEAR
110 DISPLAY "OXYGEN TIME FACTOR - "
120 PRINT
130 INPUT "ENTER PSI: ":P
140 INPUT "ENTER CONSTANT K: ":K
150 INPUT "ENTER FLOW RATE: ":F
160 LET T=(P-200)*K/F
170 PRINT
180 PRINT "ANSWER: ";T;" MINUTES."
190 END