[填空题] 下面程序的功能是从键盘上输入一个大于100的整数m，计算并输出满足不等式1+22+32+42+…+n2＜m的最大的n，请填空。
Private Sub Command1_Click()
Dim s, m,n As Integer
m=Val(InputBox("请输入一个大于100的整数"))
n= (6)
s=0
Do While s＜m
n=n+1
s=s+n*n
Loop
Print "满足不等式的最大n是" (7)
End Sub
[填空题] 下面程序的功能是从键盘上输入一个大于100的整数m，计算并输出满足不等式1+22+32+42+…+n2＜m的最大的n，请填空。
Private Sub Command1_Click()
Dim s, m,n As Integer
m=Val(InputBox("请输入一个大于100的整数"))
n= (6)
s=0
Do While s＜m
n=n+1
s=s+n*n
Loop
Print "满足不等式的最大n是" (7)
End Sub
(6)0 (7)n-1
通读程序可以发现，s用于累加求和，m用于存储被指定的大于100的整数，采用n值逐步增大试探的方法来找到“最大的n”。由于先执行n=n+1，再执行s=s+n*n累加，第一次累加时，n的值又应该是1，n的初始值就应该为0，所以第[6]空填写0；表达式s＜m是循环的条件，说明在退出循环时，加上最后一个n的平方之后，已经超过m了，因此满足循环条件的最后一个数应该是n-1，即第[7]空填写n-1。
VIP截止日期：2025-01-01 02:06:46
←请使用支付宝扫码支付
VIP截止日期：2025-01-01 02:06:46
←请使用微信扫码支付
