[编程申请]：螺旋线程序没有人会吗? 求你们了

hanguangyao

*-*3
上次的那个螺旋线程序有没有有人来给我设计呀,
我好着急,
快一点搞出来.
我会好好谢谢你的.
好给我发到邮箱里也行呀,
hanguangyao@eyou.com

ymd

下面这段代码可以计算到25次方，若不想计算25次方可简单修改即可
double hhqx::hx01(double n)
{
double b=1;
for(double i=1;i<=n;i++) b=b*i;
return b;
}
double hhqx::hx0(double A1,double l)
{
double b,x,A,e=1,f=1,o=1;
A=fabs(A1);
if(A<0.01) return 0.0;
b=l*l/2.0/A;
for(double i=2;i<=24;i=i+2){
   x=hx01(i);
   x=x*(2*i+1);
   f=f*b*b;
   e=e-o*f/x;
   o=-1*o;
   }
x=l*e;
return x;
}
double hhqx::hy0(double A1,double l)
{
double b,y,A,e,f=1,o=1,x;
A=fabs(A1);
if(A<0.01) return 0.0;
b=l*l/2.0/A;
e=b/3;
f=b;
for(double i=3;i<=25;i=i+2){
   x=hx01(i);
   x=x*(2*i+1);
   f=f*b*b;
   e=e-o*f/x;
   o=-1*o;
   }
y=l*e;
return y;
}

sparrow

这个是用来画2D螺旋线的程序

sparrow

这个是用来画3D螺旋线的lisp程序

sparrow

这个是使用上面程序的说明

Jerry541

感觉那螺线不是很好看。有办法做得更好吗？