用公式求的近似值,直到发现某一项的绝对值小于10-6 为止

while(fabs(term)>1e-6);

公式:π/4=1-1/3+1/5-1/7+...求值n=0sn=0an=1dountilABS(an)

PrivateSubCommand1_Click()a=1Don=n+1m=2*n-1s=s+a*1/ma=-aLoopUntilAbs(1/m)pi=4*sPrint"pi="&piEndSub再问

1、循环前面加一条：pi=02、i=-1改为i=-1*i

应该是Pi/4=1-1/3+1/5-1/7+…+（-1）^(n-1)/(2*n-1)吧,PrivateSubForm_Load()DimPiAsSingle,iAsLongForm1.AutoRedr

#include <iostream>#include <math.h>using namespace std;int mai

//你应该还少乘了一个4#include "stdio.h"#include "math.h"int main(){ &

#includemain(){doublepi;intn;for(n=1;n

程序没有问题吧,你想问什么?再问：结果是1-=再答：#include<stdio.h>void main(){ int i,n,sign; doub

#include#includevoidmain(){intn,p=-1;doubleq=1.0,s=0.0;//q初始化要大于1e-6for(n=1;fabs(q)>=1e-6;n=n+2){p=-

修改如下：在vc6.0下运行正常,结果,PI=3.141595#include#includevoidmain(){doubles,a,i;i=0.0;s=1.0;do{i=i+1;s=s+1.0/(

用For语句没有问题.但应该把pi=pi+t放到后面,应为执行完for下面的大括号才执行这句n=n+2严格按照你列出来的等式,每执行一次for循环体进行一次算术运算,改成下面这样就可以了#includ

刚写的,测试过了pi=3.1415927

sum=0n=1while1/(2*n-1)>1e-6\x09sum=sum+1/(2*n-1)*((-1)^(n-1));\x09n=n+1;endnsum*4

#include#includevoidmain(){ints;floatn,t,pi;s=1,pi=0,n=t=1.0;do{pi+=t;n+=2;s=-s;t=s/n;}while(fabs(t)

PrivateSubCommand1_Click()a=1Don=n+1m=2*n-1s=s+a*1/ma=-aLoopUntilAbs(1/m)pi=4*sPrint"pi="&piEndSu

放到后面,应为执行完for下面的大括号才执行这句n=n+2严格按照你列出来的等式,每执行一次for循环体进行一次算术运算,改成下面这样就可以了#include<stdio.h>#inclu

symsnx=(-1)^(n-1)/(2*n-1);n=1;xx=eval(x);%%%可换为xx=subs(x)y=0;whileabs(xx)>10^(-6)y=y+xx;n=n+1;xx=eva

PrivateSubForm_Click()DimpiAsDoubleDimnAsLongn=1Dopi=pi+4*((-1)^(n-1)*(1/(2*n-1)))n=n+1LoopUntil1/(2

首先j=(-1)/i.由于-1与i都为整数,整数与整数作除法结果仍是整数（舍去小数部分）,再强制转化到浮点.应改为j=(-1.0)/i.其次j=1+j含义不明,应改为sum=sum+j（新定义一个su