Google
 

Trailing-Edge - PDP-10 Archives - decus_20tap1_198111 - decus/20-0020/accelr.dem
There are 2 other files named accelr.dem in the archive. Click here to see a list.
100'  NAME--ACCELER
110'
120'  DESCRIPTION--CALCULATES AUTOMOBILE'S ACCELERATION FROM
130'  ZERO TO SIXTY MILES PER HOUR.
140'
150'  SOURCE--UNKNOWN
160'
170'  INSTRUCTIONS--TYPE "RUN" AND FOLLOW INSTRUCTIONS.
180'
190'
200'  *  *  *  *  *   MAIN PROGRAM   *  *  *  *  *  *  *  *  *  *  *
210'
220 PRINT "   TO OBTAIN AN AUTO'S ACCELERATION TIME FROM ZERO TO"
230 PRINT "   SIXTY M.P.H. TYPE CURB WEIGHT";
240 INPUT C
250 PRINT
260 PRINT "   BRAKE HORSEPOWER AT MAXIMUM TORQUE";
270 INPUT E
280 PRINT
290 PRINT "   REAR AXLE RATIO";
300 INPUT G
310 PRINT
320 PRINT
330 LET Q=(240*C^(1.428)/(E^2+C^(1.428)*G^2*.1))^(1.269)*5.061/284.361
340 PRINT "   60 M.P.H. IN "Q"SECONDS."
350 PRINT
360 PRINT "<<<<<<<<<TO END PROGRAM, TYPE 'STOP'>>>>>>>>>>"
370 PRINT
380 PRINT "   NEXT CAR: CURB WEIGHT";
390 GO TO 240
400 END