第一题:2^1+.(2n)^(2n-1)第二题 :[20,80]..能被3整除或者能被5整除的数的和第三题:求n个随机的[20,100]的里面的数的偶数和来个高手速度解答,
来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/26 18:01:24
第一题:2^1+.(2n)^(2n-1)第二题:[20,80]..能被3整除或者能被5整除的数的和第三题:求n个随机的[20,100]的里面的数的偶数和来个高手速度解答,第一题:2^1+.(2n)^(
第一题:2^1+.(2n)^(2n-1)第二题 :[20,80]..能被3整除或者能被5整除的数的和第三题:求n个随机的[20,100]的里面的数的偶数和来个高手速度解答,
第一题:2^1+.(2n)^(2n-1)第二题 :[20,80]..能被3整除或者能被5整除的数的和第三题:求n个随机的[20,100]的里面的数的偶数和来个高手速度解答,
第一题:2^1+.(2n)^(2n-1)第二题 :[20,80]..能被3整除或者能被5整除的数的和第三题:求n个随机的[20,100]的里面的数的偶数和来个高手速度解答,
速采纳,答题进行中!
'第一题: 2^1+.(2n)^(2n-1)
Dim i As Long, n As Integer
Do While True
n = InputBox("请输入一个整数,数值请小于5:")
If IsNumeric(n) Then Exit Do
Loop
Dim Sum As Long
For i = 1 To n
Sum = Sum + (2 * i) ^ (2 * i - 1)
Next
Print Sum
End Sub
Private Sub Command2_Click()
'第二题 :[20,80]..能被5整除的数的和
Dim i As Long
Dim Sum As Long
For i = 20 To 80
If i Mod 5 = 0 Then Sum = Sum + i '能被5整除的数的和
'If i Mod 3 = 0 Then Sum = Sum + i '能被3整除的数的和
Next
Print Sum
End Sub
Private Sub Command3_Click()
'第三题:求n个随机的[20,100]的里面的数的偶数和
Dim i As Long, n As Integer, m As Integer
Do While True
n = InputBox("请输入一个整数,数值请小于5:")
If IsNumeric(n) Then Exit Do
Loop
Randomize
Dim Sum As Long
For i = 1 To n
m = Int(Rnd * 81 + 20)
If m Mod 2 = 0 Then
Print m;
Sum = Sum + m
End If
Next
Print Sum
End Sub
请在VB窗体中加入3个Command1,2,3按钮进行测试!
完成!
求 级数:4n/(n+1)(n+2) 敛散性.1题第一小题
2^n/n*(n+1)
证明不等式:(1/n)^n+(2/n)^n+(3/n)^n+.+(n/n)^n
(n+2)!/(n+1)!
[3n(n+1)+n(n+1)(2n+1)]/6+n(n+2)化简
[3n(n+1)+n(n+1)(2n+1)]/6+n(n+2)化简
化简n分之n-1+n分之n-2+n分之n-3+.+n分之1
化简n分之n-1+n分之n-2+n分之n-3+.+n分之1
f(x)=e^x-x 求证(1/n)^n+(2/n)^n+...+(n/n)^n
第一题应用归纳推理猜测根号{[(111…1)(2n个)]-[(222…2)(n个)]}的值(n?N+) 第二题设f(n)=n^2+n...第一题应用归纳推理猜测根号{[(111…1)(2n个)]-[(222…2)(n个)]}的值(n?N+) 第二题设f(n)=n^2+
化简(n+1)(n+2)(n+3)
n*【n+1】*【n+2】化简成什么?
2n/(n+1)n!
n(n+1)(n+2)等于多少?
n+(n-1)÷2×n 求化简
n(n+1)(n+2)什么意思
1^n+2^n+...+2013^n
当n为正偶数,求证n/(n-1)+n(n-2)/(n-1)(n-3)+...+n(n-2).2/(n-1)(n-3)...1=n