[主观题]

1+ + + +…….n 最大的n。请填空
Private Sub Command1Click（）
D．im s ,m,n AS Integer
m=Val（InputBox（“请输入一个大于100的整数”））
n=_
s=0
D．o While s N=n+1
S=s+n*n
Loop
Print “满足不等式的最大n是___
E．nd Sub

1+ + + +…….n 最大的n。请填空Private Sub Command1__Click（）D．im s ,m,n AS Integerm=Val（InputBox（“请输入一个大于100的整数”））n=_______s=0D．o While s N=n+1S=s+n*nLoopPrint “满足不等式的最大n是_______E．nd Sub