下列程序段的执行的结果是Dim a（10） , b（10）i=3For j=1 To 5a（j） =jb（i） =2i + jNext jPrint b（i） ; a（i）（ ）。A．113B．315C．311D．153

题目

下列程序段的执行的结果是

Dim a（10） , b（10）

i=3

For j=1 To 5

a（j） =j

b（i） =2i + j

Next j

Print b（i） ; a（i）（ ）。

A．113

B．315

C．311

D．153

相似考题

1.下列程序段的执行的结果是 Dim a(10)，b(10) i=3 For j=1 To 5 a(j) =j b(i) =2 * i + j Next j Print b(i)；a(i)A．11 3B．3 15C．3 11D．15 3

2.（ 23 ）有下面的程序段，其功能是按图 1 所示的规律输出数据Dim a ( 3 , 5 ) As IntegerFor i=1 To 3For j=1 To 5A ( i,j ) =i+jPrint a ( i,j ) ;NextPrintNext若要按图 2 所示的规律继续输出数据，则接在上述程序段后面的程序段应该是A ）For i=1 To 5For j=1 To 3Print a （ j,i ） ;NextPrintNextB ）For i=1 To 3For j=1 To 5Print a （ j,i ） ;NextPrintNextC ）For j=1 To 5For i=1 To 3Print a （ j,i ） ;NextPrintNextD ）For i=1 To 5For j=1 To 3Print a （ i,j ） ;NextPrintNext

3.下列程序段的执行结果为______ 。 Dim A(10，10) For I = 2 To 4 For J = 4 To 5 A(I, J) = I * J Next J Next I Print A(2, 5) + A(3, 4) + A(4, 5)A．22B．42C．32D．52

4.下列程序段执行后，执行的结果是______ 。 Dim M(10) Dim N(10) i=3 For j = 1 To 5 M(j) = j N(i) = 2 * i + j Next j Print N(i); M(i)A．12 4B．11 3C．3 11D．10 2

参考答案和解析
正确答案：A
更多“下列程序段的执行的结果是 Dima(10),b(10) i=3 Forj=1To5 a(j)=j b(i)=2i＋j Nextj Prin ”相关问题

  • 第1题：

    以下程序段运行的结果是______。 Dim a(-1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Integer Dim j As Integer Do Until flag=True For i=-1 To 5 j=j+l If a(i)=False Then a(i)=True Exit For End If If i=5 Then flag=True End If Next Loop Print j

    A．20

    B．7

    C．35

    D．8


    正确答案：C
    解析：该程序段的作用是给数组a的每个数组元素赋值True，具体实现的方式为：每次从数组a的第一个元素开始判断，该元素是否为False，如果是，则令此元素为True，然后跳出循环，重新从数组a的第一个元素开始判断；如果当前元素不为False，则判断下一个元素。因此语句j=j+1将执行1+2+3+4+5+6+7=28次，即j=28。然后再遍历一遍数组a的所有元素，最后结束程序段。所以j最终的值是：j=28+7=35。

  • 第2题：

    下列程序段的执行结果为 Dim A(10，10) For 1=2 To 4 For J=4 To 5 A(I，J)=I*J Next J Next I Print A(2，5)+A(3，4)+A(4，5)

    A．22

    B．42

    C．32

    D．52


    正确答案：B
    解析：根据题意，该二维数组的赋值方法为A(1，J)=I*J，故A(2，5)、A(4，5)的值分别为10、12、20。相加的结果为42。

  • 第3题：

    下列程序段的输出结果是___。 for（i=0,j=10,k=0;i＜=j;i++,j-=3,k=i+j); cout＜＜k


    10

  • 第4题：

    下列程序段的执行结果为 Dim A(10， 10) For I=2 To 4 For J=4 To 5 A(I，J)=I*J Next J Next I Print A(2， 5)+ A(3， 4) + A(4， 5)

    A．22

    B．42

    C．32

    D．52


    正确答案：B
    解析：根据题意，该二维数组的赋值方法为A(I，J)=I(J，故A(2，5)、A(3,4)、A(4,5)的值分别为10、12、20。相加的结果为42，故答案为B。

  • 第5题：

    下列程序段的执行结果为【 】。

    Dim A (10,10)

    For i = 2 To 4

    For j =4 To 5

    A(i,j) =i*j

    Next

    Next

    Print A (2,5) +A(3,4) +A(4,5)


    正确答案：42
    42 解析：该题定义了一个2组数组，用A(i，j)：i*j给数组赋值，则A(2，5)+A(3，4)+A(4，5)=2×5+3×4+4×5=10+12+20=42。

相关内容