[填空題] 下列程序用于在帶垂直滾動(dòng)條的文本框Text1中輸出3到100之間的全部素?cái)?shù)。請(qǐng)?zhí)羁铡? Private Sub Commandl_Click()
2021-07-20
[填空題] 下列程序用于在帶垂直滾動(dòng)條的文本框Text1中輸出3到100之間的全部素?cái)?shù)。請(qǐng)?zhí)羁铡?/p>
Private Sub Commandl_Click()
Text1.Text=""
For n=3 To 100
k=Int(Sqr(n))
i=2
Flag=0
Do While i＜=______And Flag=0
If n Mod i=0 Then
Flag=1
Else
i=i+1
End If
Loop
If______Then
Text1.Text=Text1.Text & Str(n)& Chr(13)&Chr(10)
End If
Next n
End Sub
正確答案：k Flag=0
參考解析：判斷一個(gè)數(shù)是不是素?cái)?shù)，其算法是：從2開始到該數(shù)的平方根的下限(即為題中k的值)去除這個(gè)數(shù)，如果沒有可以整除的數(shù)則說明該數(shù)是個(gè)素?cái)?shù)。本題中設(shè)置了一個(gè)標(biāo)志變量Flag，默認(rèn)值為 0，如果在整除的循環(huán)中，檢查出該數(shù)不是素?cái)?shù)，則設(shè)置Flag為1，也就是循環(huán)后Flag為0的數(shù)表示該數(shù)是素?cái)?shù)，并把它顯示在Textl文本框。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。