This page has been validated.
64
DESII 07 Apr 88 17:23
100 REM *** THIS PROGRAM ASSUMES THAT THE ACCELERATIONS***
110 REM *** CAN BE AVERAGED SINCE THEIR VALUE IS SMALL***
120 REM ** AND THEY DO NOT CHANGE MUCH.***
130 REM
140 PRINT "ENTER THE TURNING POINT."
150 INPUT TP
160 LET A1A=(.00464+.00577)/2
170 LET V/A1A*33.35*3147E7
180 REM
190 REM *** VELOCITY AT RELEASE OF TANKS 1 AND 2 ****
200 REM
210 LET A2A=(.00619+.0084)/2
220 LET V=V+A2A*33.35*3.147E7
230 REM
240 REM **** VELOCITY AT RELEASE OF TANKS 3 AND 4 ****
250 REM
260 LET A3A=(.00931+ATP)/2
270 LET V=V+A3A*(TP-66.7)*3.147E7
280 REM
290 REM ****VELOCITY AT TURNING POINT ****
300 REM
310 LET A4A=(.021+ATP)/2
320 LET V=V-A4A*(100.05-TP)*3.147E7
330 REM
340 REM **** FINAL VELOCITY ****
350 REM
360 PRINT V/1000, ATP
370 PRINT "GO AGAIN?"
380 INPUT ZZ$
390 IF ZZ$="Y" THEN 150
400 END
Ready
