用公式pi=1-1 3 1 5-1 7.......求pi的近似值(用vb程序)-搜答案-智慧作业帮

//#include#include#includeintmain(){longi;intsign=1;doublepi,pi_new;doubleeps=1e-5;pi_new=0;i=1;do{p

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=PI+(double)s/i;否则s/i是按整型取结果的亲测可用,#includevoidmain(){\x09ints=-1,i,n;\x09doublePI=0.0;\x09p

上传具体的EXCEL表格

#include#includevoidmain(){inta;printf("输入项数：\n");scanf("%d",&a);doublet,s=0;inti;for(i=1;i

cos(pi-a)=b,-1

cosa=-bsin2acot(a/2)=2sinacosa（1+cosa)/sina

是的,累加器初始化给0.#include#includemain(){ints;floatn,t,pi;t=1,pi=0;n=1.0;s=1;while(fabs(t)>1e-6){pi=pi+t;n

你的y和x需要提前定义例如：>>y=123;x=147;然后再使用,另外,反正切是atan而不是arctan再问：clcclearcloseallsymsx,ya=atan(y/x);b=(pi/2-

Pi=1/3*（8+9+7.6）Pi等于‘3分之1’乘（8加9加7.6）“*”是‘乘以’（乘）的意思Pi=8.2

没人回答啊,这是技术贴.

点击图片就可以看到过程了,加油!

刚写的,测试过了pi=3.1415927

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

对sin(3x-pi)+1在[pi/3,4pi/3]上积分,积分函数F(X)=-(1/3)COS(3X-PI)+X+C,然后积分的值等于F(4PI/3)-F(PI/3)=2/3+PI

intm=1;inti,k;doublePi1=4.0;doublePi2=4.0-4.0/3;doublePi1000=0;for(i=1;i

(1)cos[(pi/3)-x]=cos[(pi/2-pi/6)-x]=cos[pi/2-(pi/6+x)]=sin[(pi/6+x)]=1/3(2)cos[(2pi/3)+x]=cos[(pi-pi

这里还有一个变量t没有定义范围假定t/T=[-11]r=-1:0.01:1;%t/Tq=cos(pi/8*(cos(pi*r)).^3-3*pi/8*cos(pi*r))+pi/4;plot(r,q)

clear;n=0;r=0;whilen

a=1;vpi=0;sign=-1;fori=1:11sign=-sign;vpi=vpi+sign/(2*i-1);endvpi=vpi*4;