文章·资料 电脑软件 手机软件 网站源码




    本 站 搜 索
   推 荐 文 章        More...
占豪:中美贸易战,怎么计算输赢?
  关于贸易战,占豪已写十几万字,但..
占豪:中美贸易战开打,美国最大目..
  据媒体报道,美贸易代表确认对华..
占豪:中美贸易战第一枪打响,中国..
  这是一篇耗时一周,每天熬夜到天..
汉语是伟大的,英语是愚蠢的
  汉语是伟大的,英语是愚蠢的  ..
人民网用这19个字总结中国的部分..
  范仲淹“先天下之忧而忧,后天下..
    文 章 阅 读 排 行
中医让你糊里糊涂地活着,西医让..
  分享一个关于中西医区别的故事,..
《钓鱼岛是中国的固有领土》白皮书
  新华网北京9月25日电 中华人民共..
圆周率
  计算圆周率   古今中外,许多..
新开一家100台电脑的网吧预算参考
根据以下客户资料:消费群体主要是大..
占豪:中美贸易战,怎么计算输赢?
  关于贸易战,占豪已写十几万字,但..
占豪:中美贸易战开打,美国最大目..
  据媒体报道,美贸易代表确认对华..
武汉遭暴雨,美女骑猛男过“江”..
  武汉遭27年来最大暴雨突袭,全城..
26岁富翁创业秘笈:当空瓶子有了..
  有想法就是英雄;一个26岁富翁创..
应急救火
  子乌乡虚有村一处山林突发火灾。..
美国前驻华公使傅立民:美国正将..
美国前驻华公使、尼克松总统首席中文..
 文 章 信 息
圆周率,计算机C++编译器中的运算程序
评论()〗〖留言〗〖收藏
〖文章分类:话题 / 科技〗〖阅读选项
微机 Windows XP 中 Dev-cpp 中的运算程序(30000位)(C++)

#include <cstdlib.h>
#include <iostream.h>
#include <fstream.h>
#define N 30015
using namespace std;
void mult (int *a,int b,int *s)
{
for (int i=N,c=0;i>=0;i--)
{
int y=(*(a+i))*b+c;
c=y/10;
*(s+i)=y%10;
}
}
void divi (int *a,int b,int *s)
{
for (int i=0,c=0;i<=N;i++)
{
int y=(*(a+i))+c*10;
c=y%b;
*(s+i)=y/b;
}
}
void incr(int *a,int *b,int *s)
{
for (int i=N,c=0;i>=0;i--)
{
int y=(*(a+i))+(*(b+i))+c;
c=y/10;
*(s+i)=y%10;
}
}
bool eqs(int *a,int *b)
{
int i=0;
while (((*(a+i))==(*(b+i)))&&(i<=N)) i++;
return i>N;
}
int main(int argc, char *argv[])
{
int lpi[N+1],lls[N+1],lsl[N+1],lp[N+1];

int *pi=lpi,*ls=lls,*sl=lsl,*p=lp;
for (int i=0;i<=N;i++)*(pi+i)=*(ls+i)=*(sl+i)=*(p+i)=0;
memset(pi,0,sizeof(pi));
memset(ls,0,sizeof(ls));
memset(sl,0,sizeof(sl));
memset(p,0,sizeof(p));
*pi=*ls=*sl=1;
for (int i=1;true;i++)
{
mult(ls,i,sl);
divi(sl,2*i+1,ls);
incr(pi,ls,p);
if (eqs(pi,p)) break;
int *t;
t=p;
p=pi;
pi=t;
if (i%50==0) cout << i << " ";
}
cout << endl;
mult(p,2,pi);
ofstream fout("pi.txt");
fout << *pi << ".";
for (int i=1;i<=N;i++)
{
fout << *(pi+i);
if (i%10==0) fout << " ";
if (i%80==0) fout << endl;
}
return EXIT_SUCCESS;
}

注:
①运行时会有数据弹出,那是无关紧要的,只为了加快了感觉速度;
②最后的txt文本里有30015位,其中最后15位可能是错的。
③程序中的<,>是大写的请改成小写。

文章作者:未知  更新日期:2008-09-10
〖文章浏览:〗〖发送文章〗〖打印文章
上下篇章 ·圆周率小数点后21500位2008-09-10
·圆周率的计算历史2008-09-10
·圆周率的推算2008-09-10
相关文章 ·圆周率的推算2008-09-10
·圆周率简介及历史2008-09-10
·圆周率的计算及方法2008-09-10
·圆周率小数点后21500位2008-09-10
·圆周率的计算历史2008-09-10