long a=10000,b,c=3500,d,e,f,g[3501];
for(;b-c;)g[b++]=a/5;
for(;d=0,f=c*2;c-=14,printf( "%.4d ",e+d/a),e=d%a)
for(b=c;d+=g[b]*a,g[b]=d%--f,d/=f--,--b;d*=b);
这个是100位程序
#include<stdio.h>
main()
{
double i,pi=1;
for(i=5;i<=1000000;i=i+4)
{
pi=pi-1/(i-2)+1/i;
}
pi=pi*4;
printf("\n%lf",pi);
}
这是我写的……
给解释下如何让c输出100位……（我是初学者，请由潜入深，谢谢）
第1个回答 2010-11-18
writeln(x:100);
long a=10000,b,c=3500,d,e,f,g[3501];
for(;b-c;)g[b++]=a/5;
for(;d=0,f=c*2;c-=14,printf( "%.4d ",e+d/a),e=d%a)
for(b=c;d+=g[b]*a,g[b]=d%--f,d/=f--,--b;d*=b);
这个是100位程序
#include<stdio.h>
main()
{
double i,pi=1;
for(i=5;i<=1000000;i=i+4)
{
pi=pi-1/(i-2)+1/i;
}
pi=pi*4;
printf("\n%lf",pi);
}
好了
long a=10000,b,c=3500,d,e,f,g[3501];
for(;b-c;)g[b++]=a/5;
for(;d=0,f=c*2;c-=14,printf( "%.4d ",e+d/a),e=d%a)
for(b=c;d+=g[b]*a,g[b]=d%--f,d/=f--,--b;d*=b);
这个是100位程序
#include<stdio.h>
main()
{
double i,pi=1;
for(i=5;i<=1000000;i=i+4)
{
pi=pi-1/(i-2)+1/i;
}
pi=pi*4;
printf("\n%lf",pi);
}
好了
第2个回答 2010-11-17
场宽？我学pascal的，应该会通用吧，只是表示形式可能略有差别，可以上网查一下。
writeln(x:100);即可本回答被提问者和网友采纳
writeln(x:100);即可本回答被提问者和网友采纳
第3个回答 2010-11-17
手记
