[單項(xiàng)選擇題] 閱讀如下程序: Private Sub Form_Click() Dim num As Integer,digit As Integer
2021-07-20
[單項(xiàng)選擇題] 閱讀如下程序: Private Sub Form_Click() Dim num As Integer,digit As Integer num=InputBox("輸入數(shù)據(jù)") Do While num <> 0digit=num Mod 10num=num10Print digit; Loop End Sub 程序運(yùn)行后,如果從鍵盤(pán)上輸入12345,則輸出的結(jié)果為
A.1 3 7 5 9
B.5 4 3 2 1
C.2 4 6 8 10
D.1 2 3 4 5
正確答案:B
參考解析:[分析] 本題使用了當(dāng)循環(huán),循環(huán)執(zhí)行的條件是num不等于0。在循環(huán)體內(nèi),先用Mod運(yùn)算符求出輸入的數(shù)num的余數(shù),接著用10對(duì)該數(shù)進(jìn)行整除,將得到的商賦給num,最后輸出余數(shù)。然后對(duì)整除后的num重復(fù)上述過(guò)程,直到num為0,結(jié)束循環(huán)。實(shí)際上該程序的功能是:從右至左,逐個(gè)讀取num的位數(shù),并將其賦值給digit,再在窗體上打印出來(lái),即輸出結(jié)果為:5、4、3、 2、1。
詞條內(nèi)容僅供參考,如果您需要解決具體問(wèn)題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢(xún)相關(guān)領(lǐng)域?qū)I(yè)人士。