vb求∏的近似值.直到最后一项绝对值小于0.0001为止.公式:∏/4≈1-1/3+1/5-1/7+.程序中问号怎么填
dim s as integer,n as integer
dim t as single,pi as single
s=1:t=1:n=1:pi=?
do whlie asb(t) >0.0001
pi=pi+?
n=n+2
s=-s
t=s/n
loop
print pi*?
人气:356 ℃ 时间:2020-03-31 05:57:53
解答
Dim s As Integer,n As integerDim t As single,pi As singles = 1:t = 1:n = 1:pi = 0Do While Abs(t) > 0.0001pi = pi + tn = n + 2s = -st = s / nLoopPrint pi * 4pi为什么为0?最后为什么是pi*4呢?第一次循环结束pi=1第二次循环结束pi=1-1/3第三次循环结束pi=1-1/3+1/5…………直到1/n<0.0001结束循环根据你提供的表达式,pi最后必须*4啊,因为循环体里面算出来的只是pi/4
推荐
- 用vb求pi/4 = 1-1/3+1/5-1/7+...公式求pi的近似值,直到最后一项绝对值小于10-6为止
- 用公式 π/4 = 1-1/3+1/5-1/7……,编程序求π的近似值,直到最后一项的绝对值小于10-4为止.
- C++的题,利用公式,π/4≈1-1/3+5/1-7/1+……,计算π的近似值,直到最后一项的绝对值小于10-4为止
- vb 编程 用pi /4 =1-1/3+1/5-1/7+...公式求pi的近似值,直到最后一项绝对值小于10-6为止
- 用π/4=1-1/3+1/5-1/7+.公式求π的近似值,直到最后一项的绝对值小于10*6为止.
- 在黑板上写上1、2、3、4……2010,每次擦掉两个数,写上它们的和或差,证明最后一个数不是0.
- There are two computers in the room. two 是划线部分 对划线部分提问
- 60( )350约等于60万(四舍五入法取近似值),( )里可填多少个数?为什么?
猜你喜欢
- 近似数一般是与原数相接近的整十整百整千数 这句话怎么理解啊?
- Taken by themselves, they do but seem to be what they are not. 怎么翻译?具体一点.
- they,their,thing,that,this,the,through,although中哪些发音时要咬舌?
- 分解x^2-4x+8y-4y^2
- c#随机数方法产生5个1~10(包括1和10)之间的整数.
- 游园不值这首诗描绘了()的春天,表达了诗人怎样的心情?
- 一个挂钟的分针长3厘米 从1小时到3小时,分针的尖端走过的路程是多少?分针扫过的面积又是多少?
- 有没有谁可以举例说明后现代“设计”思想的特点呀?