填空题

1+ + + +…….n
最大的n。请填空
Private Sub Command1__Click()
Dim s ,m,n AS Integer
m=Val(InputBox(“请输入一个大于100的整数”))
n=______
s=0
Do While s
N=n+1
S=s+n*n
Loop
Print "满足不等式的最大n是" ______
End Sub

发布于 2022-05-11 10:18:56

登录后免费查看答案
关注者
0
被浏览
13
知识点
面圈网VIP题库

面圈网VIP题库全新上线,海量真题题库资源。 90大类考试,超10万份考试真题开放下载啦

去下载看看