|
T101;
5 }( _: ]% A* y5 _- O G0 X85. Z16.;6 r2 N7 i# g7 M; x
M3 S200;
" y8 a* z- @, H1 F! x6 E& M+ ` #1=0;
" d0 k0 T$ i9 S- Q2 n8 mN1 #26=29;9 L/ q2 H( O' O" c% z1 w. V; _/ x$ d
#2=SQRT[[100-#1]*[100-#1]-29*29]-59.5 S2 V8 O9 u% ]- l$ f$ L/ r
G0 X[2*[#2]]
. o2 Q8 H4 c+ e$ w$ R2 N$ ]8 nN2 #3=[100-#1]*[100-#1]-[#26]*[#26];
& \; K6 Z* v1 R9 l #24=2*[SQRT[#3]-59.5];
8 t0 F6 g0 c$ J G32 X[#24] Z[#26-13] F8.;
$ A f% V+ A; n: \0 m0 j5 _ #26=#26-0.01;
/ P; u# U h5 i, _ IF[#26 GE [-34]] GOTO22 l8 C- ^1 W& k3 `) N$ v
G0 X85.;' O/ u9 r$ D- L* u& F h
Z16.;
6 N5 J: p2 {+ }4 Q6 j #1=#1+0.03;
% P$ f$ Z1 p7 d5 |7 r8 L U( m IF[#1 LE 3] GOTO1;
4 F! r- d2 h# N( X G0 X85.;8 l' z, K( W6 |6 Q: G/ x# T l( W
Z100.;7 y, |5 h; E9 `1 m+ [
M5;; g/ N' F- l9 x2 V* u. ]; }" H
M30; |
|