[填空題] 有如下函數(shù)過程。 Function UNC(ByVal x As Integer,ByVal y As Integer)As Integer
2021-07-20
[填空題] 有如下函數(shù)過程。
Function UNC(ByVal x As Integer,ByVal y As Integer)As Integer
Do While y<>0
S=x/y
x=y
y=S
Loop
UNC=x
End Function
以下事件調(diào)用該函數(shù),程序運行結(jié)果是 【7】 。
Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
a=12
b=2
x=UNC(a,b)
Print x
End Sub
正確答案:F
參考解析:[命題目的] 考查考生對函數(shù)的定義和調(diào)用的運用。[解題要點] 本題考查函數(shù)調(diào)用和輸出格式的語句。調(diào)用UNC的過程如下: x=12,y=2時,sic=6,x=2,y=6: x=2,y=6時,sic=0,x=6,y=0; y=0,所以跳出循環(huán),輸出x=6并結(jié)束程序。[考點鏈接] 過程的定義和調(diào)用。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。