题目内容：
下面程序的功能是从键盘输入1个大于100的整数m，计算并输出满足不等式 1+22+32+42+…+n2<m的最大的n。请填空。Private Sub Command 1_Click()
Dim S，m，n As Integer
m=Val(InputBox(“请输入一个大于100的整数”))
n=【1】
s=0
Do While S<m
n=n+1
s=s+n*n
Loop
Print“满足不等式的最大n是”； 【2】
End Sub
参考答案：
答案解析：
填空题：下面程序的功能是从键盘输入1个大于100的整数m，计算并输出满足不等式 1+22+32+42+…+n2<m的最大的n。请
- 题目分类：VB
- 题目类型：填空题
- 查看权限：VIP
Private Sub Command 1_Click()
Dim S，m，n As Integer
m=Val(InputBox(“请输入一个大于100的整数”))
n=【1】
s=0
Do While S<m
n=n+1
s=s+n*n
Loop
Print“满足不等式的最大n是”； 【2】
End Sub