[單項選擇題] 有如下程序: Option Base 1 Private Sub Form_Click()Dim arr, SumSum=0arr=Arra
2021-07-20
[單項選擇題] 有如下程序:
Option Base 1
Private Sub Form_Click()
Dim arr, Sum
Sum=0
arr=Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19)
For i=1 To 10
If arE(i)/3=arr(i)3 Then
Sum=Sum+arr(i)
End If
Next i
Print Sum
End Sub
程序運(yùn)行后,單擊窗體,輸出結(jié)果為______。
A.25
B.26
C.27
D.28
正確答案:C解析:[分析]: 本題考查的是數(shù)組賦值以及算術(shù)運(yùn)算符“/”和“”的區(qū)別。本程序段首先用Array函數(shù)給arr數(shù)組賦初值?!?”是浮點(diǎn)除法,執(zhí)行標(biāo)準(zhǔn)除法操作,結(jié)果為浮點(diǎn)數(shù)?!啊睘檎麛?shù)除法,整型整除運(yùn)算,結(jié)果為整型值。本程序的功能是:找出arr數(shù)組中能被3整除的元素值,將其累加到sum中,然后輸出。滿足該條件的元素是3、9、15,和值為27。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。