|
T101;
8 w1 k5 j3 }; p8 K E G0 X85. Z16.;8 G( i4 ^8 G/ Z% S+ e1 w1 h1 k
M3 S200;2 ^- Y) ]0 O$ E' h) F3 K( _; K
#1=0;( S$ |8 a, J, N% o9 p+ `
N1 #26=29;
% f* z& D" U! G5 s( K- i( n, N #2=SQRT[[100-#1]*[100-#1]-29*29]-59.5' N; G% A! K! L! Z3 x* f9 Y% }$ k* I
G0 X[2*[#2]]
* y* B! M! u" w2 T! J" ?( gN2 #3=[100-#1]*[100-#1]-[#26]*[#26];! q$ Y) P" K' n1 @# }* V2 s
#24=2*[SQRT[#3]-59.5];
0 v1 K9 \: c2 {; O& I& l G32 X[#24] Z[#26-13] F8.;7 H2 ]) G5 W) y: b* a/ S, N. M/ a
#26=#26-0.01;
6 j; @3 N7 C) P, B8 O0 k1 Q0 n& X IF[#26 GE [-34]] GOTO2
. Z8 ?7 h4 q5 [9 B( T' I G0 X85.;/ S4 T; P+ k! S9 \0 y5 e) C
Z16.;: U. ]& y! j$ w1 t
#1=#1+0.03;
) T* s0 J, o W* p; h IF[#1 LE 3] GOTO1;, z1 [* S5 T: \; ~
G0 X85.;" w2 c; \9 U! ^8 E% k( S- T3 v
Z100.;1 e- u4 c' a$ C! M R( D
M5;* Y% ^% k# W- z
M30; |
|