Question

vb程序设计：用泰勒级数 sin(x)=x-x^3/3!+x^5/5!-x^7/7!+x^9/9!-x^11/11!.........

用泰勒级数 sin(x)=x-x^3/3!+x^5/5!-x^7/7!+x^9/9!-x^11/11!.........
计算sin(20) 的值 ，要求最后一项的绝对值小于10-6，我虽然写出来了，但是数学问太浓了，我不会用循环写，写了很久了
希望大家帮帮我，谢谢了

Answer 1

我以前写的，C语言的改造一下就变成VB的了，速度有点慢，精确到小数点后6位，入参X是角度弧度值。
double sin(double x)
{
double result,temp,x1;
int m,n;
result=x;
n=1;
m=1;
x1=x;
temp=1;
do
{
x1=-x1*x*x;
printf("x1=%f\n",x1);
n=n+2;
m=m*n*(n-1);
printf("m=%d\n",m);
temp=x1/m;
printf("temp=%f\n",temp);
result=result+temp;
}while((temp>0.0000001)||(temp<-0.0000001));
return result;
}