?=2CBIH4EH
D TSLR<E<N <RHOM-L DOPNDITNI\NX<1H>H> A>H"0GL54.HUXZ(/D"4HGXL6XBD$1"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"BBB()0P0X&L?M?0 S I=A-G*S*S/2-V*S+Z*S*(Q/2+Q^2/6+Q^3/12+Q^4/20+Q^5/30)?M?M9?M??M?M?P?P?P?P?P?P?P?P?P?P?P?P?P?M?M??B?2AAVC-8K FOCAL 1969?M
AHG\F2B-U0BLFXG2C-U>A7BDT "CONTROL CALLING LUNAR MODULE."!"FOR ANY TIME INTERVAL T,"?MBUBFT " YOU MAY SET THE FUEL RATE K TO 0 OR ANY"!"VALUE "?MB7BHT "BETWEEN 8 & 200 LBS/SEC. YOU	VE 16000 LBS FUEL. ESTIMATED"!?MCYBKT "FREE FALL IMPACT TIME-120 SECS. CAP
ULE WEIGHT-32500 LBS"!?MC9BTT !,!,!,"   TIME   ALTITUDE   SPEED   FUEL WT  MOMENTUM  "?MDZB^T "INTERVAL   RATE"!"   SEC   MILES FEET   FPS      LBS    "?MD.B(T "RELATIVE    SEC     LBS/SEC"!;E?MEMB2S L=0;S A=120;S V=1;S M=32500;S N=6500;S G=.001;S Z=1.8?M
DJT %4.01,L,%4,FITR(A),5280*(A-FITR(A))?MFDDTT %5.01,5280*V,%6.01,M-N,%7.05,M*V/32500;A "  T="T,"   K="K?MF"EFT %7.02,!;I (K)2.72;I (200-K)2.72;I (K-8)2.71,3.1,3.1?MF/EGI (K-0)2.72,3.1,2.72?MGBEHT "NOT POSSIBLE";F X=1,43;T "."?MGMEIT "K=";A K;G 2.7?MGFJI 
(M-N)-.001)4.1;I (T-.001)2.1;S S=T?MG6F(I ((N+S*K)-M)3.5,3.5;S S=(M-N)/K?MHJF2D 9;I (I)7.1;I (V)3.8,3.8;I (J)8.1?MHRGPD 6;G 3.1?MH"HJT "FUEL OUT AT",L," SECS"!?MH;H(S S=(-V+FSQT(V*V+2*A*G))/G;S V=V+G*S;S L=L+S?MIRJJT "ON THE MOON AT",L," SECS"!;S W=3600*V
MI2JTT "IMPACT VELOCITY OF",W," M.P.H.   (",V*5280," F.P.S.)"!?MJKJ^T "FUEL LEFT ",M-N," LBS."!;I (-W+1)5.5,5.5?MJ J(T "PERFECT LANDING !-(LUCKY)"!;G 5.9?MKJ2I (-W+10)5.6,5.6;T "GOOD LANDING-(COULD BE BETTER)!";G 5.9?MK"J<I (-W+25)5.7,5.7;T "CONGRATULETIO
S ON A POOR LANDING"!;G 5.9?MK?KFI (-W+60)5.8,5.8;T "CRAFT DAMAGE. GOOD LUCK"!;G 5.9?ML^KPT "SORRY,BUT THERE WERE NO SURVIVORS-YOU BLEW IT!"!"IN "?MMKQT "FACT YOU BLASTED A NEW LUNAR CRATER",W*.277777," FT. DEEP"!?MMLKZT !!!"TRY AGAIN
"!?MMK\A "(ANS. YES OR NO)"P;I (P-0NO)5.94,5.98?MM2K^I (P-0YES)5.92,1.2,5.92?MM>K"T "CONTROL OUT";Q?MNTLJS L=L+S;S T=T-S;S M=M-S*K;S A=I;S V=J?MN0NJI (S-.005)5.1;S S=2*A/(V+FSQT(V*V+2*A*(G-Z*K/M)))?MN:N^D 9;D 6;G 7.1?MO[PJS W=(1-M*G/(Z*K))/2;S S=M*V/(Z*K*
W+FSQT(W*W+V/Z)))+.05;D 9?MO6P^I (I)7.1,7.1;D 6;I (-J)3.1,3.1;I (V)3.1,3.1,8.1?MPRRJS Q=S*K/M;S J=V+G*S+Z*(-Q-Q^2/2-Q^3/3-Q^4/4-Q^5/5)?MR(S I=A-G*S*S/2-V*S+Z*S*(Q/2+Q^2/6+Q^3/12+Q^4/20+Q^5/30)?MEARBY ISN	T HIT THE MARK!",!;G 11.1?MQ)SFT "YEAH, LUCKY CHANC
, THE GREEN BARETS ARE WAITING FOR YOU!",!;G 11.1?MRIVJA !!"ONCE MORE 
 (YES OR NO)"W; I (W-0YES)GLK	K>3FGLK	K03VGLK	ES3/GLK	BZ2ZGLK	%24GLK$2GLJ.J(20GLG>PE33GLG=RV2VGLG=QL38GLGLK639GLGB3TGLFF	3
GLC*KG3+GKA0K).GHJ?66GEKSA/.=GEHIK%GEHIKX8Q8Q=78TD08!OQKP?/OON>(+V/MEJ<8^8"8 ;T
\K[
^KZ
]/&8O+?K	2A
+]K8[9K;[:K<
:S:S9+02I/78H?;DBWU2C/?[(04=/=.C?[KJ^AKK03X&BX&BKKCF<(*0CI>(+CKKCG> KHKJZCJE?*20BJEJC=H*2ZCKK069H8T[K[MJE[NO* KK&B:K-03:0AJ^A	+&BKB	+&BK-&B2C.F JE8!*\AXHDNAAZ?8??KL[MSM+RSN+P02/O2C	\/XZ)8 K][/K-	+
/S/K.	+
/O/S/
//,=Q8XLL K52A
62I/7V>38H[+05K82A
62I/70!=<&KNJJI?H.NJ",.= :P:?9?4&JN06:J"Z!JM2J!Z!JL2J Z
JI*GA<<DBEJ:SG?D:<:Q8HB(9DJ*ZNB	9DZ$J$9DJ$J+Z%N9HZ$RNZZ&J	2J
Z
J&8!Z&R&R%J<(.,9DZ<P+EK1
0J&9HN%<P+[9J8J8J^JNJ8J8HB	2J
	/NJB	2J!	/J$9DZ$8DJ)	/+E=.=/049&[<J^8![;K<S;+7/2AZ^R^*H8BZPJQZ/R/N/<(.8!R/JP> *DN/Z.BJ<;CAQ!%WEG	CAGAGFT	WTQ!A	A!G	$DG	A!QWDT\$!	GA!$TDVRE%CDV$D=P%UECS	QWGA!FWUU%TSSIQQ	?%3	.C	0?CQ=8CA8?]).C)8,C)0>CA>*C	0*AI.8,D5C1:0C8<A[D8AXE<CC8<C%0>CS8=C%:>B30(AI(8A0E
A I<A2E(AHG4AKX8B<8AA, B$8X(,D084DP<8(FP&(FZA*%-:>"337 N=70^
 FX0AAT0AJB*D?(D0L FX DL F0 B$>AYG4AD.>BOL-C	84BC4>\\>CA=0B8/C	8<BC4(FL0(FLX0BQP(E-0B" =F3&BM5RBR9=BQ9>BU5
C?8HBP5=BO7^BS79BT70BV5(02;Z[	K([)K	9H[	K)<X/QK	0<;P8H<P+ K)0;K	+V8Q2C/*9.07S/:K7>(+2[7/.8[.0A	82C/9 =3,C,CVCDKA4J&HD+>&\(J??M?AAH\&\)+?B2+?AC?\&P6CNE7TCP0M??[+[0 BMDTE=CBNBGBCC
BJBMA?B.?A>?0A?OB??><?B0= =R=3?=?;?7?B PXQ-/M02HA\AAVPOTGEQM5D?E\E,R<UBKLGQT5Q-TUCBR"S0DKMOM[P]G$GP2WVU41015=0=5U:Z0W!>H->8XR8AYXVJVXKJU%)IZXHX2IZXW%*%	;D<%&*OB*A%&%&IZXOXP%%H]XK%0%1+2*9PV%,ITH5> %6H0XHX2H7%;%0<H%%%&H6IN> *0%5%.)?% FI%7<()?XRHR8A*ZJ%0H6IJ
(+RX^	9H	C:H&> %6H	%/8DX7%1%%%1+ +*H,9FH,8DH7X7%%%1%6+*H,H7X7%%%1+ <H%69H7AD> 8PH7AF<0%6> K;8P8DX5/B.? PPLPHI0Z9M+KWUWUWU*E*<WUWUY&=^9F8F8F.K%,HR%"%O%5H5?H*3%-8HSXI%:%3%6% FF%$5%7<(*98AXXH5? *0%9%3*9%9X7*U%-%6% FH%$5%$OLKXR.>FIFSX98 HH9\K8 H.?EGHKXKHK9!HY
X%6/HB:OQX98 HKQ8A\K8 H,9O\: O\XIS\IOHIOX9LI\KP9+%IOH/\N;: O,S,XIIOX9LK\IP9+3/,W BJBOBWH=I
WUH5FHFL<:%,%-%6HSXR%%H6IN>(-=%(K>*HH6=%"%%%(K><H*SLK%	G;A7%6%,PV%-*7H7> %+%%%)H6IN> *$%8<(*98AXXH5?%9%3*;%9X7*
HS*+XV-!H5?(*9%)*4LG%0%(O7/H6SJB>(+O%1/<H/SS/FVOQXJLJ=H+ 8!H6> +TOQ8 HJX,<HSQSQ;/QD!AD8!X9H7ADH9>(S$/$2CH^> +4%%/.%*%	7>\B/.H]FHFLCSCFCICDCGCCCACTCLCECWCMCQCRBJ%4&
PK& IIXZH%=HPZ?(PZ<H/7%	K?;9%%*X%%*UNAP	% LC%0H6K]< %6HX%"% NJLKXX$G4X%	K?9?%6HX%"% NJ%	K?9<%6%PX% NJ%PX%O% FH%$O%$PX%$<8LKXX$GDXO[4XUUH%? -!HX%"%<8+A=C=T%TE+A$+%"H6K^> %6% NJ$+03:LK0/<H$+:-^H!H!HKDPFCZ2JBJC=CRDF]J.A?M331: X.XV%	K9A>P.*V% LCH6%"J-:P^8A%YL
X6*B% NK%X*CPV%%%	LCG;%)*[%%%,H7X**DH?$38AH?%)%%*DB:%,%-%6H0XHX2H7%;HHXW$4YPV%%%)%	>J9%&*;H08AXHX2%*%	9J9%&+FF[<(H68!X9OLSLXJLJ=H+ H9> +THJOLX9L9X9,9SL;/L$+83=3Z+&32X&0A-^0&0V0!+/:/,J;J8W KBJ9B1KJB%B"B!BB$B B,B;BM%4B"BM%6X2%&%%%(O7*VH6ARH1X1%%%(O7*V*Q%2*
H1X.&0LKX1&/$+[OI\XXHX8!HY?(*1LX8!H1>(+EHXH8*!P	NAHYHE9!HK>P%6HYH8XYH1\XPXKO\XPX$GE
4X-!HXXILI8!KO> *,PXPX-!B H6IL> /O%%+P=P=GPB"H6IM> S[H6KVX,H,?H/[H6KW?(S[/[$GKX(3X[XX$-^8XRLKX9,9J!JZJ)J&X*J+J+FHFLO/H,%"H-%"H.%"JA%"%%X-%4*W+Z+% LG%4*$BJC?%6I
XXIIH,<(*	8A>(+SH,IQ?H+3%2<H%6H,XTHTIQ?XTHT8!H-?H+HH-9J8JKYZ<H-> %$$$GDX5UIUXXHTH->(-!LKX-*-%2<H+5H-%"HX[P%PXHTX-%%%4+3+Z+*PDX%$IUXXX^%Y%$$*RX.%%%(O7+,H.9DH6+%2%6"ALK%	Q42G%2%6"APK-^B B+B-B/B*C^B(C[B<B)C]B>B,B;BMB=%TE%$$JY?H$)$G82XIUXX"	.WNRAPCLWH,IQ?.]H,
P? R].]PVLKX-J\LK8!H,> %6%%.	0B%-.2PV%%H6IN> *7HO8 HSX/I[8!HS>()?2ILS\UI[X9L9<(+WXZHS9!HZ>XH/HZ\9HZ+I8 HSXIH/8 HSXJH/H0X0HH8 HJXZHHH/XHLJ\IPZ+(*3BP$4X6%(NS/-%)/-U[V(V^U5VXUOU:VTVUV,U=WBVYU7CX%4*
*R*KH6IJ< %6I]X02I][2A)?%,H0XH%5PSH5?%8%3)?%8X7*UI\XY-!FFI[XUI[XSHSXIH79!%:<(*6>X*7HSXU%8< *&<HR"HS8AXOXP."FTX?HHFK/H6<(+NH=X6HVI>(%).<X8 *>HV> +VI>(8AY*=IH+ESLPP+%HQARX6H6IC>(+KH6K./X%<XQ8 XPHQ9J8J8J+\? >!2ILU\0H0\UH1< \HHH8AX02A/0/0J+FL2BG/G/2(AP?60Y*M0
AF<(*MIS.LW?H7%/AR""IB%)H7""K.X6%).UT^AFXZIKX[**P[XZHZJK=*(:H[%)HZIK%)."=	<(H6IN<(*>H?$3.5H?$3H>*<BYIH8!H6<(K*IA<(/-K+X9H9C,K.< K,>(+ZH9AR< ]2A/BIR]+TUXP2+/H1%;X19ISK9HH>P/]%6 C?A XD> %/X18 X2/]W82ILR2A/4H4S&2ILO2A/:R ==Z8HZA0!*U0"XNN5<(*U0$XN^5J58AAGJ3Z5
Y*&0^AF<(*&ISZ2J2JB>(+ H\> %6J2X\0I**0JX
&+Z[2$JA9DJ0A,BMYPYPYP[2H\=(*7Z>X\J>.6BMZ60AN4> +A0BHN> +LJ60&XN+SJ6^4J48AAGJ3Z40A.>[V: KVX70AHN> +[0B+"ISX7PNIEX/8 J3XH2A\HP/+)X\J3Z5J3Z48 0&IA%)%+PR%7<(+?X7IA%)%)%+H?%)IVY*)?H2> *LHH8!HW?.!J)%)HHX92IP2*"L9ARIC> *
8 X28 HHXHL9AAX1.!UXL9AAHF> *X\9*YC\I\XXHY8!HX>(-!LX/NKMXOXP%%%)%%%)%%%)PXLX	L%%%)PX$GDX%XH?%)H8IIHX*+T"C=:()L 6F6E<H$+8!2I
"2A%%%	ZE?>% NK$+[KC 2K	!KC%>(+<K$K2K	!H,JI>(.J-^ZLZKCXCY=*?4Y7JYJZ2K&HZ)% NJJ)9DX%JXX$-^J LV,R[0)Z	0*09.[0:2IV(2A.[??=7:% NJ$+2K.)J	> -!R	IDX7X5.8DQKQ[P$+<(+(=H+T"% NJ$+"$+"% NJ$+"$+"KSX3-^8^8^V>[+8!"JZ03:$4["K!03:K"++VDA2I
P2ASP/"KRX3-^T=2K	//+=9Q/	>K?=+;JX?H+;OR++1:OR/0V6=&B-LAG^VAPMO
/PNMYYG?7PX$8ZA\3L3T2)1.7;T "8?M\<CFIF (PDP-1)1.8;T "8/S?M]GCPIF (PDP)1.9;T "5?M]RCZT " COMPUTER."!!?M]YDOSET XF=1?M]&DTT !"SHALL I RETAIN "?M]2DYT "LOG, EXP, ATN 
?M^AD^DO 10;IF (RE)2.9,2.4,2.4?M^ZD(DO 2.2;T "SINE, COSINE 
";DO 10;IF (RE)2.5;R?M^"D2S XF=-1; R?M^(EZS XF=0?M^;T(A RE;I (RE-0YES) 10.5,10.45,10.5?M
DT- SET RE=-1;R?M
QT2IF (RE-0NO)10.6,10.8?M
(T<T !"PLEASE ANSWER 	YES	 OR 	NO	 ";G 10.4?MUPSET RE=1;R?MPDC\XFA0REA08[V0"OP[PO"["KU8 >(*\KU
[O[K$S[<(*

[*LKV>(/
KOC]K!ZZ2C/VMKR[PK"8J8JC]KO[OO S K^<(*5K
<(*>K\[QMKR<(*S[P*%K%[QK\[ K\
 K
ZA*/K\[QKOC]> */KWKO[OKV< KXK
[SM<0	C]B<B/MBBHA?BJ5:
<8F>:A2C1B>"B:KY0&0!+(KZ0&0!+,/
MKR<(*S[P*%K%[QK\[ K\
 K
ZA*/K\[Q ^TW
%*K/25EW9:"+<]QU>.(J?WT%
K*2/E59W":<+Q]>U(.?JTW
%*K/25EW9:"+<]QU>.(J?WT%
K*2/E59W":<+Q]>U(.?JTW
%*K/25EW9:"+<]QU>.(J?WT%
NNDS]E.:JHU5TX"+(0EWQ)B&*SDE].J:UHT5"X(+AD[FH,H,CRDB;D^[M2;CRDABMBYZMTG%=K8Y>1"0?1*720J3&7:;\LP/*CK29K8X8 17:19>(*VK51!K61!:+H1!OB8A>(+F9A3$3Y?*&K(
*K)
++G;,K7>(*5;$K6>(+JI
4JJ
3+KW1+L0&00000000P/0!*6H/IX?H+ITXTXTXTXTXTXTX0&0A% DQ0BK09<(+$?HK6IPX/K,XIK-\IP/+[K09?HIDK.K/X]/	RL3K3GI+I.DAWUE0&OXFV1PD3RV,GB B$2%!X1% L
PXLX/9RDH,CRDNRZ-FH,CLB;H%?H	TX[$GK6=$+[U$G86>F=V>6=&=6>KH3VCE[VV=J?3VCB&>KV3VF=[VQKNKUH$X$P[-^$G6=CN^=-^+R+VDS:LB?<Q/)/J,,CGU6+!AWET]APBP)3$GF=&=6><K9&>K63VC3&>K0&>K-&=[V/,(TT
N??[D$\?;[F,,T
N&TWSS?=\W8*L;H%?H3X[$G6]V
H%?H*Q$GF
^]6]: [2.S	ZS2.\$G6]F^V].\+B+R+N	NH%<(%6?H$)$G7.V
H%<(-^?*4$GF

.7.: X[HEX$8 O.X%X&X	8A
.$G/6]G.V
7.+K(	.K%	.K"	.K
	.K\	.KY	.KV	.N].\
??"?? !??UOCG?>!K:I?>U][A?=	&G9?<R^D?9%$O]	VVK$L$): /3X"+(0EWQ)B&*SDCLB;$G3RCNSRH%? *MH%?-^$)8 X[$G[F3V$+$G83RCVSRF3RSJH%?H*%$G3RH[8 X[$GCRSNH%?H*1$GCJSR3R$GCR[N3RR3VCZVK^VK"VK&VKNRP[-^$)-^CYH
.Z]BYH
.Z]AYH
.Z]?4UA8MH"?9,4-L1(?=TY+1	^+UDLY7T5"X(+NRO/V^BFG^O6O
/PO
/PCLB;1[\H*%/ARXZHZ8!<(KV[]H*<(*!AR[[K]K[=H*X: HZ[[8 H[=:HZ=H*3KV=:KWX9OYH9[^H98!X9KUW^O^KX?H*5
^P9+QW^P[:H*>(+.K]H[= +-K[=:8!H[8!XZH[HZ>(+HZ8A?HIE^PZ+CIB%)+C8 K^[^**E?:G?61(1,E??-L	ZS]/^.8 H[X[S\++8 [\+KLL+K:	ZIB%)RLL^S\+28 [\+30IH%X(H%?H$)/92HX&X$X%X	[LX(H6J4<(*PII> *Q8 X(&6H6J5>(*P"W..VH6J2>(.W%1.W*	H,[K"7SL> %6&6*XH6IJ?H.WH6J3? .WH6AR* <;<&=U= G
09H	XH&X"H%X![JMM[MKKXX"X![KJ.7E/CH	9DX	H&8DX&H%8DX%KJ8D[J/M/H;H	HX	8DH&H"X&8DH%H!X%8DKJ[J/[5J;H!=H9P8HX!H"8HX"H8HXP /,/,&*SDE]L;JYK]:H%?K\K^%)	+X[H$=H*W< K!?(*\$G	$8AH[*I$G	*8 *U
%
&K(XLH$9 [,KX$%WS,*%O&<(*8K"?H*48A\LP$K"P[8O&P[8<H		\LP$*8K(XLK	).K[%)H[=H8!X%H[?IIK^%)H%P$K
=+MK X%8 H$< ,H%	Z.T"CE?3B=B->\A$?<?6?92=/K/J.7<7,29-9- IK%)/,2ILS2A/02ILX2A/5?6?>=RB = YJS> 	FH6IL>(*B	BH6IM> *Q	F
E	COE8!X[KHX$	D	G$G4XH6KA> *&	F	B	DH	H[X[$GDXH[<(.?*1$G"=4X8A*6$G"94X8 H[X[*&DT?=Y&Y	Y(<;..W9;/LG.;]H\W.=WSO<H:IE[H
?+4PZ+TS+THKK>>P/"PK-!BJK=8 [=9 X
K=< 0L> K?IVY*//3FI8 X
0NAF<(+RISX6/Q%/!$MC;X	XN<(.Z2J2AS>(*NIDBX IFB2H X J3B2>(*YL X R8 H XMJ29F8FAG<(*7J4Z2N2<(*5Z2KDXLIOX/LM\LP/*-.26AD5;KC*;KCXM8 H XLIOX/LL\MP/*>*A
	5	8*A	:	9	;	7*AH%> +UX$X%X&X	*A%$% %$$$+=H+"8 Z2XH%> %6%TE%$$%$<8+0%<8%$ 	6R2++*A	6*A9+8D;]6S/,7//[5F5E9G535M5KB;H	8!X	H&8 <X9AX&H%8 <X9AX%.C5HH%<(H&>(+IH!<(H"<(H>(.SH 8!H$<(*;ZCJC=8![RKRK^?H*=JC?*5/SR*1*;8 H X 	SSR*8RS.SH ?+DH$?.S+FH$?JC? .SH X$H!X%H"X&
X	.S/,I1	)H$?(++8AXK(X "SWP	+$P&<HP%X		*H&/TW-99;X$X%X&+$5I;H%=H8P8HX%H&8HX&H	8HX	P$////C
C?BJC=??548AH T?H+[A[Z?Z>H%
)H!	*BH"	*CH&
)H!	*CH"	*D*3Z<H
)H%	*DH&	*EH	
)H!	*DH"	*EH	*FKAX%KX&J?X	AX	.D.649RP($)		P	/AH!>(%6H 8!8AT?+	(A/S4A9NH$X$IT%H!?8 X(H%<(/&?H$)H!<(/&/T5P;]:1:.:9P;H8!XH"8 <X9AX"H!8 <X9AX!/+;1H(?H$)/;P<(.Z,Z+J/Z-9J,8HZ,J+<P*P9J.8HZ+R-*HJ,8HZ-N8!J*Z,J-9N,^,R,8DJ+N,^,<P.R,V,.*&9BD0?4?)9QZZ,J0Z-<H%W9H"H&Z.8
H%H!<P+DX%J.X&:J,8DZ,J8DZR-*7J,X&JX%.18D[]R-*7K]X%JX&J,X	.19E	=6H%<(H	<(H&>(+3H%9D?H+0%W9 H$X$+		>6/]X$/]7/;2H%=H8!?H	5/6-99;$G2<H%?H%6H$=H8P8HZ8<XR88J7Z9Z:Z;J=<(J>>(*5$GB<Z8J8: H$X$H$8!J8> *1H%8!J9> *1H&8!J:=8!8A?-^$G28*WX$-^XMAA=C[ 2LI[WH0WHYWH]W+N%%%)H
IN> +LHN> +R2J//=KXZHZ8F8F(%/8D(8J8H((:H?%)/W=$C.IK%)HZ/(GAPR,2ILI2A/0U"2I\H2A/52I
>2A/?DX3

Note: Lines longer than 256 characters were wrapped