执行以下程序后,在窗体上输出的是( )。 Private Sub Command l Click() Dim a(20) For{=1 T0 20 Step 2 a(j)=j Next i Print a(1)+a(2)+a(3) End Sub

admin2020-02-27  25

问题 执行以下程序后,在窗体上输出的是(    )。
Private Sub Command l Click()
Dim a(20)
For{=1 T0 20 Step 2
a(j)=j
Next i
Print a(1)+a(2)+a(3)
End Sub

选项 A、4
B、5
C、6
D、7

答案A

解析 本题考查数组元素的赋值。利用循环对数组a中所有的元素赋值,循环变量的初值为1,步长为2:因此数组a中所有的奇数下标项的值为相应的下标,偶数下标项的值为0。因此a(1)+a(2)+(3)=1+0+3。
转载请注明原文地址:https://jikaoti.com/ti/lSx0FFFM
0

随机试题
最新回复(0)