[单项选择题] 阅读程序:
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 10
If 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
[单项选择题] 阅读程序:
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 10
If 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。
VIP截止日期:2025-01-02 00:05:59
←请使用支付宝扫码支付VIP截止日期:2025-01-02 00:05:59
←请使用微信扫码支付