下列程序运行时输出的结果是 Option Base 1 Private Sub Form_Click() Dim x(10) As Integer,y(5) As Integer For i=1 to 10 x(i)=10-i+1 Next F

admin2010-11-20  53

问题 下列程序运行时输出的结果是
Option Base 1
Private Sub Form_Click()
Dim x(10) As Integer,y(5) As Integer
For i=1 to 10
x(i)=10-i+1
Next
For i= 1 to 5
y(i)=x(2*i-1)+x(2*i)
Next
For i= 1 to 5
Print y(i)
Next
End Sub

选项 A、3 7 11 45 19       
B、19 15 11 7 3       
C、1 3 5 7 9       
D、不确定的值

答案B

解析 本题考查数组的定义和赋值。题中定义了数组x(10)和y(5),并通过For 循环给每个数组成员赋值。
转载请注明原文地址:https://jikaoti.com/ti/cFg0FFFM
0

最新回复(0)