|
T101;
& u Q# t' J4 X/ G3 u7 ^6 v# k) e G0 X85. Z16.;
+ Y$ ^+ V7 U/ \) h7 J- U w M3 S200;8 s' h, L& \% | P6 l+ I
#1=0;8 e, @# m: i/ h1 }9 d
N1 #26=29;1 u1 ~* \8 W# D3 Y+ S8 ~
#2=SQRT[[100-#1]*[100-#1]-29*29]-59.5
- i6 H, D$ R( r7 q& X G0 X[2*[#2]]: o0 @4 @0 w4 G8 @2 @& }7 g( `
N2 #3=[100-#1]*[100-#1]-[#26]*[#26];5 T) g! W/ u/ P9 d
#24=2*[SQRT[#3]-59.5];: p4 O2 h: F3 r2 d4 S3 v
G32 X[#24] Z[#26-13] F8.;2 h$ O1 s4 s L- e* O' N: `
#26=#26-0.01;$ ?! w6 p3 L' ~
IF[#26 GE [-34]] GOTO28 q1 S! k0 u! t# @
G0 X85.;& \) Z% t. V1 ^& ?& Q% z* T$ n
Z16.;
3 S' [& e6 v$ x$ y7 `" K$ w #1=#1+0.03;
8 e0 H: _+ ]0 d3 E IF[#1 LE 3] GOTO1;
4 p: |8 R7 i4 j8 U' ^) M8 z% J G0 X85.; i9 B9 B. C9 o
Z100.;1 N4 V; H9 h4 I3 T. R" P$ t
M5;5 n' m( U: Y8 W7 e2 w
M30; |
|