[填空題] 下面程序的功能是從鍵盤(pán)輸入—個(gè)大于100的整數(shù)m，計(jì)算并輸出滿足不等式
1+2²+3²+4²+…+n²＜m
的最大的n。請(qǐng)?zhí)羁铡?br> 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[評(píng)析] Do While…Loop是先判斷條件表達(dá)式的值是否為T(mén)rue，如果為T(mén)rue，則執(zhí)行循環(huán)體，如果為False，則執(zhí)行Loop后面的語(yǔ)句。由循環(huán)體可知該題的第1空應(yīng)該填0。當(dāng)循環(huán)條件不滿足時(shí)跳出循環(huán)，此時(shí)的n是滿足不等式1+22+32+42+…+n2＞=m的最小的n，所以該題的第2空應(yīng)該填n-1。