江恩正方运算器（解盘）

2011-02-19 11:01:00来源:本站整理浏览:1747

{江恩正方运算器}
{n:666,1,10000}
园360A:POW(SQRT(N)+2,2);
园360B:=POW(SQRT(N)-2,2);
半圆180A:=POW(SQRT(N)+1,2);
半圆180B:=POW(SQRT(N)-1,2);
三倍120A:=POW(SQRT(N)+0.666,2);
三倍120B:=POW(SQRT(N)-0.666,2);
三倍240A:=POW(SQRT(N)+1.333,2);
三倍240B:=POW(SQRT(N)-1.333,2);
正方90A:=POW(SQRT(N)+0.5,2);
正方90B:=POW(SQRT(N)-0.5,2);
正方270A:=POW(SQRT(N)+1.5,2);
正方270B:=POW(SQRT(N)-1.5,2);
六倍60A:=POW(SQRT(N)+0.333,2);
六倍60B:=POW(SQRT(N)-0.333,2);
六倍300A:=POW(SQRT(N)+1.666,2);
六倍300B:=POW(SQRT(N)-1.666,2);
EXPLAINEX(园360A,'园360a: ',园360A,2,0);
EXPLAINEX(半圆180A,'半圆180a: ',半圆180A,2,0);
EXPLAINEX(三倍120A,'三倍120a: ',三倍120A,2,0);
EXPLAINEX(三倍240A,'三倍240a: ',三倍240A,2,0);
EXPLAINEX(正方90A,'正方90a: ',正方90A,2,0);
EXPLAINEX(正方270A,'正方270a: ',正方270A,2,0);
EXPLAINEX(六倍60A,'六倍60a: ',六倍60A,2,0);
EXPLAINEX(六倍300A,'六倍300a: ',六倍300A,2,0);
EXPLAINEX(园360B,'园360b: ',园360B,2,0);
EXPLAINEX(半圆180B,'半圆180b: ',半圆180B,2,0);
EXPLAINEX(三倍120B,'三倍120b: ',三倍120A,2,0);
EXPLAINEX(三倍240A,'三倍240b: ',三倍240B,2,0);
EXPLAINEX(正方90B,'正方90b: ',正方90B,2,0);
EXPLAINEX(正方270B,'正方270b: ',正方270B,2,0);
EXPLAINEX(六倍60B,'六倍60b: ',六倍60B,2,0);
EXPLAINEX(六倍300B,'六倍300b: ',六倍300B,2,0);