穿越火线m37:求N的N次方的累加和值大于10000的最小值
来源:百度文库 编辑:高考问答 时间:2024/04/29 12:54:03
大哥帮帮我吧
For n = 1 To 10
m = n ^ n + m
If m > 10000 Then
m = m - n ^ n
MsgBox (n-1)
MsgBox m
Exit Sub
End If
Next
n=5
m=3413