问题 单项选择题

阅读程序: Option Base 1 Private Sub Form_Click() Dim arr, Sum Sum=0 art=Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19) For i=1 To 10If arr(i)/3=arr(i)\3 Then Sum=Sum+arr(i)End If Next i Print Sum End Sub 程序运行后,单击窗体,输出结果为______。

A.13

B.14

C.27

D.15

答案

参考答案:C

解析:

[分析]: 整数除法运算符(\)执行整除运算,结果为整型值,所以“arr(i)/3=arr(i)\3”为数组arr元素值被3整除的条件。计算结果为:3+9+15=27。

判断题
多项选择题