用vb中的for循环计算π的近似值.要求输入一个数然后根据这个数求近似公式要用π=2* (4 / (1 * 3)) * (16/ (3 * 5)) * (36 / (5 * 7)) * ...

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/05 16:33:54

用vb中的for循环计算π的近似值.要求输入一个数然后根据这个数求近似公式要用π=2* (4 / (1 * 3)) * (16/ (3 * 5)) * (36 / (5 * 7)) * ...
用vb中的for循环计算π的近似值.要求输入一个数然后根据这个数求近似
公式要用π=2* (4 / (1 * 3)) * (16/ (3 * 5)) * (36 / (5 * 7)) * ...

用vb中的for循环计算π的近似值.要求输入一个数然后根据这个数求近似公式要用π=2* (4 / (1 * 3)) * (16/ (3 * 5)) * (36 / (5 * 7)) * ...
Private Sub Command1_Click()
Dim n,pi,i
pi = 2
n = Val(InputBox("请输入一个数"))
For i = 1 To n
pi = pi * ((2 * i) ^ 2 / ((2 * i - 1) * (2 * i + 1)))
Next i
MsgBox "π的近似值为" & pi
End Sub

用vb中的for循环计算π的近似值.要求输入一个数然后根据这个数求近似公式要用π=2* (4 / (1 * 3)) * (16/ (3 * 5)) * (36 / (5 * 7)) * ... VB中的阶乘累加求和1!+2!+3!+4!+5!+6!+7!+8!+9!+10!我是VB的初学者 用for循环解 急用! VB的循环结构程序设计用For循环语句实现下列的图形 用vb 设计一个函数 求e的近似值 计算好难 VB中的For循环的步长为小数是怎样执行的? VB编程:利用For循环,计算1-N的奇、偶数之和,其中N为自然数.窗体界面的设计要求,如图请输入要计算的数:XXXXXXXXX 奇数和:XXXXXXX 计算 偶数和:XXXXXXXXX 用do while 循环语句求自然对数e的近似值,要求其误差小于0.00001, 2道VB问题1.caption 为open(&p)为什么可以写成o&pen 2.π/4=1-1/3+1/5-1/7+.,求π的近似值,要求取前5000项计算.下面的代码运行结果为20000,哪里错了?Private Sub Form_Load()Showk = 0p = (-1) ^ (i + 1) / (2 * i - 1)For i = 用VB计算N!分别用while和for循环语句计算N!(N由界面输入) vb中for循环有没有计算次数的公式啊?我是说,在分析程序时.怎么分析for的循环次数.谢谢各位了! VB题在For循环中,计算循环次数,这两者有何区别 VB程序里的循环结构怎么写?for循环和do while循环 VB用for 循环算1-100的奇数跟偶数有多少个? 利用循环语句 用VB计算1到100的奇数的和 计算FOR循环的次数 do—while循环的应用:利用下述公式求π的近似值,要求满足计算精度为0.0001π/4≈1-1/3+1/5-1/7+1/9-… 请VB编程求解:用1-8八个数字不重复使用,组成两个四位数,其中一个是另一个的四倍计算结果在文本框中显示出来.请问怎么用VB编程写算法?最好提供用for循环和不用for循环两种算法. VB的循环结构程序设计采用For循环语句实现下列的图形