VB循环结构程序设计 上机题 用Do Loop Until或While …Wend循环 用π/4 π≈1-1/3+1/5
来源:学生作业帮 编辑:搜搜考试网作业帮 分类:数学作业 时间:2024/05/16 20:39:16
VB循环结构程序设计 上机题 用Do Loop Until或While …Wend循环 用π/4 π≈1-1/3+1/5-1/7+...…… (-1)
'a是你的精度.b是最终结果 i是循环变量
Const pi As Double = 3.14159
Private Function GetPi(ByVal a As Double)
Dim b As Double,i As Long
Do
i = i + 1
b = b + 1 / (2 * i - 1) * (-1) ^ (i + 1) '数学问题
DoEvents
Loop Until Abs(4 * b - pi)
Const pi As Double = 3.14159
Private Function GetPi(ByVal a As Double)
Dim b As Double,i As Long
Do
i = i + 1
b = b + 1 / (2 * i - 1) * (-1) ^ (i + 1) '数学问题
DoEvents
Loop Until Abs(4 * b - pi)
VB循环结构程序设计 上机题 用Do Loop Until或While …Wend循环 用π/4 π≈1-1/3+1/5
输入一个整数,用VB的While wend 或 Do Loop Until判断质数.
Vb Do while|until…Loop 循环语句
vb中用for、do…loop和while…wend循环三种形式分别求3的n次方
大一新生的C语言问题,第12题,循环结构程序设计用for或while或do while
While-Wend循环结构与Do-Loop循环结构在循环体部分的执行上有什么不同之处?
VB分析For...Next循环结构与Do While...Loop循环结构的异同点
VB中 while .wend 与 DO while.loop区别
VB 函数 do while ...Loop 与 while .wend 的区别
用VB的do...loop循环写语句!
用for循环,while循环,do…while循环,分别编写程序求s=1+3+5+……+19的值,并显示结果
VB的循环结构程序设计