高校问答压缩天然气密度是多少:vb高手请进
来源：百度文库 编辑：高校问答 时间：2024/05/09 10:18:28
sum=11*22*32*42...*(n*10+2),求sum不大于100000的最小的N
Private Sub Form_click()
Dim i As Integer, sum As Long
n = 2
i = n * 10 + 2
sum = 11
Do While sum < 100000
sum = sum * i
n = n + 1
Loop
Print "n=": n
End Sub
这个哪里错了啊
Private Sub Form_click()
Dim i As Integer, sum As Long
n = 2
i = n * 10 + 2
sum = 11
Do While sum < 100000
sum = sum * i
n = n + 1
Loop
Print "n=": n
End Sub
这个哪里错了啊