[单项选择题] 有如下程序:
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
程序运行后,单击窗体,输出结果为______。
A.25
B.26
C.27
D.28
正确答案:C解析:[分析]: 本题考查的是数组赋值以及算术运算符“/”和“”的区别。本程序段首先用Array函数给arr数组赋初值。“/”是浮点除法,执行标准除法 *** 作,结果为浮点数。“”为整数除法,整型整除运算,结果为整型值。本程序的功能是:找出arr数组中能被3整除的元素值,将其累加到sum中,然后输出。满足该条件的元素是3、9、15,和值为27。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)