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*?
人气:430 ℃ 时间: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为止.
- 《为学》通过贫富二僧往南海的故事,说明了什么道理,告诉我们在学习中什么的重要
- 3.Mum often cooks nice food_______us.(填介词)
- 现在用叶公好龙讽刺怎样的人
猜你喜欢
- 2N+1的数是奇数N为整数这句话对吗?
- 如图反比例函数y=m-5的图像的一支
- 在夏天为什么从冰箱里拿出一罐饮料不久饮料罐的外壁出现了许多小水珠
- 如果计算3个月后的今天是星期几?
- 把10,20,30,40,50,60,70,80,90填在下面的括号里,使每条线上3个数的和都相等
- I really don't think Rose will be upset,but I will go and see her in case she______.
- 仁爱英语初一上unit1----unit4单词考查
- 比较大小