用VB编写 VB计算公式S=1+1/3+1/5+1/7+.+1/2n-1的和,当第n项的值

来源：学生作业帮助网编辑：六六作业网时间：2025/02/06 11:39:24

用VB编写VB计算公式S=1+1/3+1/5+1/7+.+1/2n-1的和,当第n项的值用VB编写VB计算公式S=1+1/3+1/5+1/7+.+1/2n-1的和,当第n项的值用VB编写VB计算公式S

用VB编写 VB计算公式S=1+1/3+1/5+1/7+.+1/2n-1的和,当第n项的值
用VB编写 VB计算公式S=1+1/3+1/5+1/7+.+1/2n-1的和,当第n项的值

Private Sub Command1_Click()
Dim sum As Double
Dim i As Long
Dim n As Double

n = ((1 / (10 ^ -5)) + 1) / 2 '正好等于10 ^ -5时候n的值
n = Round(n + 0.5, 0) '对n+0.5进行四舍五入处理,保证n只要有小数点后面有数就进,不舍.

For i = 1 To n '计算n项的和
sum = sum + 1 / (2 * i - 1)
Next i
Print "项数n为：" & n
Print "n项和为：" & sum
End Sub

调试如下图：

用VB编写 VB计算公式S=1+1/3+1/5+1/7+.+1/2n-1的和,当第n项的值用VB编写程序.计算1+2+3+.+100 用VB编写函数过程,计算s=1+1/2+1/3+…+1/100.运行程序时,单击窗体,输出上述计算结果的值. 编写一个过程,用来计算输出S=1+1/2+1/3+…+1/100 的值.大神们帮帮忙用vb做啊! 用VB编写程序,计算1!+2!+3!+……+15!的值. 用VB编写“输入整数N,计算1!+2!+.+N!=” vb语句编写S=1*2*3*……*n的值怎么编? VB编程计算由下列公式确定的S值S = 1 + + + + … + ( A.frm) 求s=1-1/2+1/3-1/4+..+1/99-1/100的值用vb程序编写编写程序计算s=1+3+5+...+n求s=100得值,请画出流程图,并写出相应的VB语句代码 vb编程.会的来.感激不尽~vb 【循环结构】编程计算【s=1+2+3++100的值】编程；VB 编写一个过程,用来计算下列表达式的值,并在事件过程中调用.S=1+1/2!+1/3!+...+1/n! 用VB计算S=1+2^2+2^3+…+2^10的代码用VB程序写出计算s=1!+2!+3!+…+50!的值. 用vb do while 语句编写.已知π/4=1-1/3+1/5-1/7+1/9-1/11.,求计算十万次后的结果用vb的循环do while结构,怎么写? VB编写程序计算1~100内3的倍数的数的和输入一个数N.已知n!=n=(n-1)*(n-2)...3*2*1,编写程序计算和显示s=1!+2!+3!+...用VB做.代码+解释思路. 输入一个数N.已知n!=n=(n-1)*(n-2)...3*2*1,编写程序计算和显示s=1!+2!+3!+...用VB做.代码+解释思路.