下面程序运行后，输出结果为( )。 Dim a() a=Array(1，3，5,7,9) s=0 For i=1 To 4 s=s*10+a(i) Next i Print s

A．1357

B．3579

C．7531

D．9753

[单选题]下面程序运行后，输出结果为( )。 Dim a() a=Array(1,3,5,7,9) s=0 For i=1 To 4 s=s*10+a(i) Next i Print sA．1357B．3579C．7531D．9753

[单选题]下列程序运行后，输出结果为( )。 Dim a() a＝Array(1,3,5,7,9) s＝0 For i＝1 To 4 s＝s*10+a(i) Next i Print sA．1357B．3579C．7531D．9753

[单选题]下列程序的输出结果是( )。 Dim a a=Array(1，2，3，4，5，6，7，8) i=0 For k=100 To 90 Step-2 s=a(i)^2 If a(i)＞3 Then Exit For i=i+1 Next k Print k；i；sA．88 6 36B．88 1 2C．90 2 4D．94 3 16

[单选题]运行下面的程序后,输出的结果为C．lsD．im t(5, 5) as IntegerF．or i=1 To 5: t(i, i) =1: NextF．or i=1 To 5F．or j=1 To 5Print t(i, j),NextPrintNextA．1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1B．1 1 1 1 1C．1 0 0 0 0 0 1 0 0 0 0 0 1 0 0 0 0 0 1 0 0 0 0 0 1D．1 1 1 1 1

[单选题]下面程序运行后,输出的结果是D．im arr(3,3)F．or j=1 To 3F．or k=1 To 3A．rr(j,k)=(j-1)*3+kNext kNext jF．or j=2 To 3F．or j=2 To 3Print arr(k,j);Next kPrintNext jA．2 5 3 6B．5 8 6 9C．4 7 5 8D．5 9 6 8

[单选题]下面程序运行后，输出的结果是 Dim arr(3,3) For j=1 To 3 For k=1 To 3 Arr(j,k)=(j-1)*3+k Next k Next j For j=2 To 3 For j=2 To 3 Print art(k,j)； Next k Print Next jA．2 5 3 6B．5 8 6 9C．4 7 5 8D．5 9 6 8

[主观题]1，3，5，7，9，（　　）。A.7B.8C.11D.未给出

[单选题]下面程序运行后，输出的结果是D．im arr(3，3)F．or j=1 To 3F．or k=1 To 3A．rt(j,k)=(j-1)*3+kNext kNext jF．or j=2 To 3F．or k=2 To 3Print arr(k,j)；Next kPrintNext jA．25 36B．58 69C．47 58D．59 68

[单选题]下面程序的运行结果是______。 Dim a，i，s a=Array("6"，"5"，"a"，"b"，"2"，"1") s=0 i=0 Dw While a(i)＞="0" And a(i)＜="9" s=10* s+a(i)-"0" Print s i=i+2 LoopA．12ba56B．652C．6D．62

[主观题]下列程序的输出结果是( )。 Dima a=Array(1，2,3,4,5,6,7,8) i=0 ForK=100 To 90 Step-2 s=a(i)^2 If a(i)＞3 Then Exit For i=i+1 Nextk Printk；a(i)；sA．88 6 36B．88 1 2C．90 2 4D．94 4 16