H-4
230 IF A(L) < A(J) THEN
TEMP = RtJ):
A(J) = A(L):
A(L) = TEMP:
J = J-D:
IF J>0 THEN 220
240 NEXT I
250 GOTO 170
260 END
270 ' PRINT SORTED ARRAY
280 '
290 PRINT: INPUT"PRESS 'ENTER' TO LIST SORTED ARRAY";A$
300 FOR I=1 TO N
310 PRINT A(I),
320 NEXT I
330 END
340 ' STORE NUMBER OF DATA ELEMENTS HERE
350 DATA 10
360 ' STORE ACTUAL DATA HERE
370 DATA 10.8,9,8.7,8.3,7,3.333,2.010,2,10,0.98
Space-Ship Lander
This challenging program lets you simulate a landing sequence on any of four
planetary bodies: Earth, Moon, Mars, and the asteroid Vesta. Before each
10-second "burn" interval, you are given the following information:
Elapsed Time (seconds)
Altitude (kilometers)
Velocity (kilometers/hour –
negative amount indicates motion
away from planetary body)
Remaining Fuel (kilograms)
Using this information, you select a "burn rate" (kilograms of fuel/ second).
For example, a 10 Kg/sec burn rate consumes 100 Kg during the 10-second
mandatory burn interval. Burns must be in the range 0-100 Kg/sec, (over 100
Kg/sec would cause the "G" force to become too great.)
Hints:
• A negative velocity indicates you burned too much fuel and are moving
away from the planetary body.
• Fuel burns may include fractional parts (e.g., 15.5 Kg/sec)
• As you consume fuel, the weight of the lander decreases. Therefore
subsequent burns will be increasingly effective
Comments to this Manuals