VB程序设计 1、 编程计算S=1/1!+1/2!+1/3!+…..+1/n!,n的值通过inputbox从键盘输入,计
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/09/29 21:01:55
VB程序设计 1、 编程计算S=1/1!+1/2!+1/3!+…..+1/n!,n的值通过inputbox从键盘输入,计算结果在窗体上输
Private Sub Command1_Click()
Dim i As Integer, j As Integer, n As Integer
Dim sum1 As Long, sum2 As Long
n=inputbox("请输入n的值")
sum1 = 0
sum3=1
For i = 1 To n
sum2 = 1
For j = 1 To i
sum2 = sum2 * j
sum3=sum2^(-1)
Next j
sum1 = sum1 + sum3
Next i
Label1.Caption = Label1.Caption + Str(sum1)
End Sub
需要一个button 和一个lable,结果在lable上显示
再问: 输出的答案不对呀,全是等于2。为什么呢?
再答: 我这里没有平台。不应该吧。没觉得哪里错了。你在试试。
再问: 你是学VB程序设计的吗?帮我解决几道题,好吗?可以加你QQ吗?
再答: 把sum2=1 放到for i=1 to n上边
再问: 还是全部答案都等于2!呵呵
再答: Private Sub Command1_Click() Dim i As Integer, j As Integer, n As Integer Dim sum1 ,sum2, sum3 As Single n = InputBox("请输入n的值") sum1 = 0 sum2 = 1 sum3 = 1 For i = 1 To n For j = 1 To i sum2 = sum2 * j sum3 = sum2 ^ (-1) Next j sum1 = sum1 + sum3 Next i Label1.Caption = Label1.Caption + Str(sum1) End Sub 这回可以了。我用vb调试过了。之前我错了。忘了你这个不是整数结果。都是小数。这回没错了!
Dim i As Integer, j As Integer, n As Integer
Dim sum1 As Long, sum2 As Long
n=inputbox("请输入n的值")
sum1 = 0
sum3=1
For i = 1 To n
sum2 = 1
For j = 1 To i
sum2 = sum2 * j
sum3=sum2^(-1)
Next j
sum1 = sum1 + sum3
Next i
Label1.Caption = Label1.Caption + Str(sum1)
End Sub
需要一个button 和一个lable,结果在lable上显示
再问: 输出的答案不对呀,全是等于2。为什么呢?
再答: 我这里没有平台。不应该吧。没觉得哪里错了。你在试试。
再问: 你是学VB程序设计的吗?帮我解决几道题,好吗?可以加你QQ吗?
再答: 把sum2=1 放到for i=1 to n上边
再问: 还是全部答案都等于2!呵呵
再答: Private Sub Command1_Click() Dim i As Integer, j As Integer, n As Integer Dim sum1 ,sum2, sum3 As Single n = InputBox("请输入n的值") sum1 = 0 sum2 = 1 sum3 = 1 For i = 1 To n For j = 1 To i sum2 = sum2 * j sum3 = sum2 ^ (-1) Next j sum1 = sum1 + sum3 Next i Label1.Caption = Label1.Caption + Str(sum1) End Sub 这回可以了。我用vb调试过了。之前我错了。忘了你这个不是整数结果。都是小数。这回没错了!
VB程序设计 1、 编程计算S=1/1!+1/2!+1/3!+…..+1/n!,n的值通过inputbox从键盘输入,计
程序设计:从键盘输入一正整数,编程计算S=1+2+3+.+N的值
C语言编程 计算1!+2!+3!+...+n!的值,其中n的值通过键盘输入
计算1+2+……n=?,其中n通过键盘输入.要求用汇编语言中的循环程序设计来实现.
用VB编程 求1+2+3+……+n,n由键盘输入
VB题 编程求S=1²+2²+3²+.+N²(其中N的值要求用键盘输入)
2. 求s=1+1/2!+1/4!+….+1/(2n)!,n从键盘输入,要求通过模块子程序或模块函数的结构来编程.
已知S=1*1+2*2+3*3+4*4+……+(N-1)(N-1)+N*N,从键盘输入N计算S的值.写出程序
计算 n! = 1 * 2 * 3 * ... * (n - 1) * n(从键盘输入 n 的值)
vb从键盘输入一个正整数n,计算sum=1/2-2/3+3/4-4/5+…+(n-2)/(n-1)-(n-1)/n
C语言编程题:S=1!+2!+3!+4!+5!+…+n!n由键盘输入
1、编程计算f(n)=1!+2!+3!+…+n!.其中n由键盘输入,且n最大值10000.