设执行以下程序段时依次输入2,4,6执行结果为 Dim a(4) As Integer,b(4) As Integer For k =0 To 2 a(k + 1) = Val(InputBox( "Enter d

admin2009-03-15  20

问题 设执行以下程序段时依次输入2,4,6执行结果为      Dim a(4) As Integer,b(4) As Integer      For k =0 To 2            a(k + 1) = Val(InputBox( "Enter data:" ) )            b(3 - k) =a(k + 1)      Next      Print b(k)

选项 A、2
B、4
C、6
D、0

答案1

解析 此程序段开始声明了两个整型数组a和b,其长度均为4。
   程序通过For…Next语句为其赋值,a(k+1)=Val (InputBox("Enter data:")),b(3-k)=a(k+1)。
   当k=0时,输入2,a(1)二b(3):2;
   当k=1时,输入4,a(2);b(2):4;
   当k=2时,输入4,a(3)二b(1):6;
   当L=3时,中断循环,执行Print语句,即要求输出 b(k)的值,而k的当前值为3,即要输出的值是b(3),其值为2。
转载请注明原文地址:https://kaotiyun.com/show/uQ1p777K
0

随机试题
最新回复(0)