[填空題] 下面程序的功能是從鍵盤上輸入一個(gè)大于100的整數(shù)m，計(jì)算并輸出滿足不等式1+2²+3²+4²+…+n²＜m的最大的n，請(qǐng)?zhí)羁铡?/p>

Private Sub Command1_Click()

Dim s, m,n As Integer

m=Val(InputBox("請(qǐng)輸入一個(gè)大于100的整數(shù)"))

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

通讀程序可以發(fā)現(xiàn)，s用于累加求和，m用于存儲(chǔ)被指定的大于100的整數(shù)，采用n值逐步增大試探的方法來找到“最大的n”。由于先執(zhí)行n=n+1，再執(zhí)行s=s+n*n累加，第一次累加時(shí)，n的值又應(yīng)該是1，n的初始值就應(yīng)該為0，所以第[6]空填寫0；表達(dá)式s＜m是循環(huán)的條件，說明在退出循環(huán)時(shí)，加上最后一個(gè)n的平方之后，已經(jīng)超過m了，因此滿足循環(huán)條件的最后一個(gè)數(shù)應(yīng)該是n-1，即第[7]空填寫n-1。