?=2CBDH4EH D TSLRH> 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?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>GO? 2B%=BHHMA2BTS C=C/100;S D=FITR(.1+100*(C-FITR(C)));S C=FITR(C)?MBDB^S M=M-2;I (M)5.4,5.4;GOTO 5.5?MB^J(S M=M+12;S D=D-1;I (-D)5.5,5.5;S D=99;S C=C-1?MB;J2S X=FITR?MCLJ +YP P&+H&LO<(+]8!X&R=.=H&8A&LOH%X%P+*>X%M]< *).=GRM 8!HOXO/&F8I\[12B$)BHLA-[/,BIL*HABJBIBHFEJGLK K>3FGLK K03VGLK ES3/GLK BZ2ZGLK %24GLK$2GLJ.J(2 GLG>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<<>>EJF:;G?D:<:Q8HB(9DJ*ZNB 9DZ$J$9DJ$J+Z%N9HZ$RNZZ&J 2J Z J&8!Z&R&R%J<(.,9DZ *DN/Z.BT<;CAQ!%WEG CAGAGFT WTQ!A A!G $DG A!QWDT\$! GA!$TDVRE%CDV$D=M%UECS QWGA!FWUU%TSSIQQ ?%3 .C 0?CQ=8CA8?]).C)8,C)0>CA>*C 0*AI.8,D5C1:0C8CS8=C%:>B30(AI(8A0E A I"337 N=70^ FX0AAT0AJB*D?(D0L FX DL F0 B$>AYG4AD.>BOL-C 84BC4>\\>CA=0B8/C 8BU5 C?8HBP5=BO7^BS79BT70BV5(02;Z[ K([)K 9H[ K)(+2[7/.8[.0A 82C/9 JS> 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>P/"PK-!BJ?0K=8 [=9 X K=< 0L> K?IVY*//3FI8 X 0NAF<(+RISX6/Q??%/!$=S,C,CVCDKA4JFXHD)>&PZJ??M?FWAHPX\8)?B0)???PXAA6CN7TCF0M??V>[0 BMBE=CBNBGBCC BJBMA?B.?A>?0A?OB??>H->8XR8AYXVJVXKJU%)IZXHX2IZXW%*% ;D<%&*OB*A%&%&IZXOXP%%H]XK%0%1+2*9PV%,ITH5> %6H0XHX2H7%;%0 *0%5%.)?% FI%7<()?XRHR8A*ZFD%0H6I >(+RX^ 9H C:H&> %6H %/8DX7%1%%%1+ +*H,9FH,8DH7X7%%%1%6+*H,H7X7%%%1+ 8PH7AF<0%6> K;8P8DX5/B.? PPLPHI0Z9M+KWUWUWU*E*FIFSX98 HH9\K8 H.?EGHKXKHK9!H >X%6/HB:OQX98 HKQ8A\K8 H,9OQ: O\XIS\IOHIOX9LI\KP9+%IOH/\N;: O,S,XIIOX9LK\IP9+3/,W BJBOBWH=I WUH5FHFL<:%,%-%6HSXR%%H6IN>(-=%(K>*HH6=%"%%%(K> %+%%%)H6IN> *$%8<(*98AXXH5?%9%3*;%9X7* HS*+XV-!H5?(*9%)*4NS%0%(O7/H6SJB>(+O%1/ +TOQ8 HJX,(S$/$.&H^> +4%%/.%*% 7>\B/.H]FHFLCSCFCICDCGCCCACTCLCECWCMCQCRBJ%4& PK& IIXZH%=HPZ?(PZ %6% NJ$+03:LK0/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=GT XOB"H6IM> S[H6KVX,H,?H/[H6KW?(S[/[$GKX(3X[XX$-^8XRLKX9,9J!JZJ)J&X*J+J+FHFLHMH,%"H-%"H.%"JA%"%%X-%4*W+Z+% LG%4*$BJC?%6I XXIIH,<(* 8A>(+SH,IQ?H+3%2 %$$$GDX5UIUXXHTH->(-!LKX-*-%2B,B;BMB=%TE%$$JY?H$)$G82XIUXX" .WNRXSD,?CN%H,IQ?. H,IP? R].]HOLKX-J\LK8!H,> %6%%. B70B%-.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< *&(%).HV> +VI>(8AY*=IH+ESLPP+%HQARX6H6IC>(+KH6K./X%!B82ILU\0H0\UH1< \HHH8AX02A/0/0J+FL2BG/G/2(AP?60Y* 0^AF<(*MIS.LW6H7%/AR""IB%)H7""K.X6%).UT^AFXZIKX[**P[XZHZJK=*(:H[%)HZIK%)."= <(H6IN<(*>H?$3.5H?$3H>*(+ZH9AR< ]2A/BIR]+TUXP2+/H1%;X19ISK9HH>P/]%6 C?A XD> %/X18 X2/]W82ILR2A/4H4S&2ILO2A/:R BJ ==Z8HZA0!*U0"XNN5<(*U0$XN^5J58AA J3Z50Y*&0^AF<(*&ISZ2J2JB>(+ H\> %6J2X\0I**0JX &+Z[2$JA9DJ0A,BMYPYSYSBJH\=(*7Z>X\J>.6T=Z60AN4> +A0BHN> +LJ60&XN+SJ6^4J48AAGJ3Z40A.>[VV$: 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% NK$+[KC 2K !KC%>(+(.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-^[:2K //+=9Q/ >K?=+;JX?H+;OR++1:OR/0V6=&B-AJP$BJTHREAPWRBXKMDTCA0DGX0XBXQGT "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(*\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: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?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]NRO/V^BFHR BXSDNRA0AXSD-HMCLB;$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(+E0QWB)*&DS]E.:JHU5TX"+(0EWQ)B&*SDE]L;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,?9-L ZS]/^.8 H[X[S\++8 [\+KLL+K: ZIB%)RLL^S\+28 [\+3; H%X(H%?H$)/9CJX&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.."H XH&X"H%X![JMM[MKKXX"X![KJ.7AA/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\A$?=RB = YO > 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>P/"PK-!BJ3\K=8 [=9 X K=< 0L> K?IVY*//3FI8 X 0NAF<(+RISX6/Q%/!$N>;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//[5F5E9G535M5KW;H 8!X H&8 (+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&H% )H! *BH" *CH& )H! *CH" *D*3Z(%6H 8!8AT?+ (A/S4A8HH$X$IT%H!?8 X(H%<(/&?H$)H!<(/&/T5P;]:1:.:5F;H8!XH"8 (+3H%9D?H+0%W9 H$X$+ >6/]X$/]7/;2H%=H8!?H 5/6-99;$G2>(*5$GB *1H%8!J9> *1H&8!J:=8!8A?-^$G28*WX$-^XMA=C[ 2LI[WH0WHYWH]W+N%%%)H6I > +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