[填空題] 下面的程序執(zhí)行時,可以從鍵盤輸入一正整數(shù),然后把該數(shù)的每位數(shù)字按逆序輸出。例如:輸入7685,則輸出5867;輸入1000,則輸出0 0 0 1。請
2021-07-20
[填空題] 下面的程序執(zhí)行時,可以從鍵盤輸入一正整數(shù),然后把該數(shù)的每位數(shù)字按逆序輸出。例如:輸入7685,則輸出5867;輸入1000,則輸出0 0 0 1。請?zhí)羁铡?/p>
Private Sub Command1_Click()
Dim x As Integer
x=InputBox("請輸入一個正整數(shù)")
While x>______
Print x Mod 10;
x=x10
Wend
Print ______
End Sub
正確答案:10 x
參考解析:任何一個正整數(shù)與10相除的余數(shù)都是這個正整數(shù)的個位數(shù)字,為了將由鍵盤輸入的正整數(shù)的每位數(shù)字按逆序輸出,每次循環(huán)先輸出該數(shù)的個位數(shù)字,再利用整除運算將該數(shù)的個位數(shù)字去掉,以此類推。在第[14]空處應(yīng)該填循環(huán)執(zhí)行條件判斷,此處填10,在只有一位數(shù)的情況下退出循環(huán);第[15]空填寫x,輸出最后一位數(shù)。若第[14]空填0,則第[15]空無須填寫,請讀者思考。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。