山西电视台公共频道直播:求N的N次方的累加和值大于10000的最小值
来源:百度文库 编辑:神马品牌网 时间:2024/05/22 02:39:13
大哥帮帮我吧
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