[填空題] 下列程序用于在帶垂直滾動條件的文本框Text1中輸出3~100字間的全部素數(shù)。請?zhí)羁铡? Privat Sub Command1_Click()
2021-07-20
[填空題] 下列程序用于在帶垂直滾動條件的文本框Text1中輸出3~100字間的全部素數(shù)。請?zhí)羁铡?/p>
Privat Sub Command1_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
Eise
i=i+1
Else
loop
If ______ Then
Text1.Text=text1. Text & Str(n) & Chr(13) & Chr(10)
End If
Next n
End Sub
正確答案:k Flag=0
參考解析:判斷一個數(shù)是不是素數(shù),其算法是:從2開始到該數(shù)的平方根的下限(即為題中k的值)去除這個數(shù),如果沒有可以整除的數(shù)則說明該數(shù)是素數(shù)。本題中設(shè)置了一個標志變量Flag,默認值為0,如果在整除的循環(huán)中,檢查出該數(shù)不是素數(shù),則設(shè)置Flag為1,也就是循環(huán)后Flag為0的數(shù)表示該數(shù)是素數(shù),并把它顯示在Text1文本框中。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。