（ 6 ） 下面程序的功能是从键盘输入 1 大于 100 的整数 m ，计算并输出满足不等式

1+22+32 +42 + …… .+n2<m

的最大的 n 。请填空

Private Sub Command1__Click （）

D．im s ,m,n AS Integer

m=Val （ InputBox （ “ 请输入一个大于 100 的整数 ” ））

n=_________

s=0

D．o While s<m

n=n+1

s=s+n*n

Loop

Print “ 满足不等式的最大 n 是_____

E．nd Sub