下列程序段的执行结果为______。Dim A（3，3)For M=1 To 3For N=1 To 3If N=M 0r N=3-M+1 Then A（M，

相似题目

• 下列程序的执行结果为________Option Base 0Private Sub Command1_Click()Dim aa = Array(a, b, c, d, e, f, g)Print a(1); a(3); a(5)End sub

  查看最佳答案

• 下列程序段的执行结果为_______。Dima(3,5)AsIntegerDimiAsInteger,jAsIntegerFori=1To3Forj=1To5a(i,j)=a(i-1,j-1)+(i-1)*5+jNextjNextiPrinta(3,4)（5.0分）

  查看最佳答案

• 下列程序段的执行结果为 ________ 。 Dim M(10), N(10) i= 4 For j = 1 To 7 M(j) = j N(i) = 2 * i + j Next j Print N(i); M(i)

  查看最佳答案

• 下列VBA程序段的执行结果为__________。I=1DoWhileI<=10SUM=SUM+II=I+1LoopDebug.PrintSUM（2.0分）

  查看最佳答案

• 下列程序的运行结果是________。Dim a%(3,3),i%,j%For i=1 to 3a(I,i)=1:a(I,4-i)=1next iFor i=1 to 3For j=1 to 3Print a(I,j);next jPrintnext i

  查看最佳答案

• 下面程序段的运行结果为________。 Dim s As Integer, i As Integer i = 1: s = 1 Do i =i + s Loop Until s >20 Print i, s

  查看最佳答案

• 下列程序段的执行结果为________。Dim M(10), N(10)i= 4For j = 1 To 7M(j) = jN(i) = 2 * i + jNext jPrint N(i); M(i)

  查看最佳答案

• 下列程序的执行结果是 _ ________ __ Dim a(5) As String Dim b As Integer Dim I As Integer For I = 0 To 5 a(I) = I + 1 Print a(I); Next I

  查看最佳答案

• 下列程序段的执行结果是 ________ 。 Dimension a(8) a(1)=1 a(2)=1 for i=3to 8 a(i)=a(i-1)+a(i-2) next

  查看最佳答案

• 下列程序段的执行结果为______。 K=0 For I=1 To 3 A=I^I^K Print A; Next I

  A．1 1 1 B．1 4 9 C．0 0 0 D．1 2 3

  查看最佳答案

• 下列程序段的执行结果为 ______。 A=0：B=0 For I=-1 To-2 Step-1 For J=1 To 2 B=B+1 Next J A=A+1 Next I Print A；B

  A．2 4 B．-2 2 C．4 2 D．2 3

  查看最佳答案

• 下列程序段的执行结果为______。x=5y=-20If Not X＞0 Then X=Y-3 Else Y=X+3Print X-Y;Y-XA．-3 3B．

  下列程序段的执行结果为______。 x=5 y=-20 If Not X＞0 Then X=Y-3 Else Y=X+3 Print X-Y;Y-X A．-3 3 B．5 -8 C．3 -3 D．25 -25

  查看最佳答案

• 下列程序段的执行结果为 ______。A=0:B=0For I = -1 To -2 Step -1For J = 1 To 2B=B+1Next JA=A+

  下列程序段的执行结果为 ______。A=0:B=0For I = -1 To -2 Step -1 For J = 1 To 2 B=B+1 Next J A=A+1Next IPrint A; B A．2 4 B．-2 C．4 D．2

  查看最佳答案

• 下列程序段的执行结果为 ______。 Dim A(10)，B(5) For i=1 To 10 A(i)=i Next i For j=1 To 5 B(j)=j*20 Next j A(5)=B(2) Print"A(5)="；A(5)

  A．A(5)=5 B．A(5)=10 C．A(5)=20 D．A(5)=40

  查看最佳答案

• 下列程序段的执行结果为______。x=5y=3If Not x ＞ 1 Theny=y+1Else x=x-1Printx；yA．5 3B．5 4C．3 4

  下列程序段的执行结果为______。 x=5 y=3 If Not x ＞ 1 Then y=y+1 Else x=x-1 Print x；y A．5 3 B．5 4 C．3 4 D．4 3

  查看最佳答案

• 下列程序段的执行结果为______。Dim M（10), N（10)I=3For T = 1 To 5M（T) = TN（I) = 2 * I + TNext

  下列程序段的执行结果为______。 Dim M(10), N(10) I=3 For T = 1 To 5 M(T) = T N(I) = 2 * I + T Next T Print N(I)； M(I) A． 3 11 B．3 15 C．11 3 D．15 3

  查看最佳答案

• 下列程序段的执行结果为 ______。A=0：B=0For I=-1 To -2 Step -1 For J=1 To 2 B=B+1 Next J A=A+

  下列程序段的执行结果为 ______。 A=0：B=0 For I=-1 To -2 Step -1 For J=1 To 2 B=B+1 Next J A=A+1 Next I Print A；B A．2 4 B．-2 2 C．4 2 D．2 3

  查看最佳答案

• 下列程序段的执行结果为______ 。Dim A（4)N= 3A（1) =1For K=0 To N-1For L=1 To K+1 X=K+2 -L A（X

  下列程序段的执行结果为______ 。 Dim A(4) N= 3 A(1) =1 For K=0 To N-1 For L=1 To K+1 X=K+2 -L A(X)=A(X)+A(X-1) If K＜N-1 Then Exit For Print A(X)； Next L Next K A． 1 2 1 B．1 2 3 C．2 4 6 D．1 3 1

  查看最佳答案

• 下列程序段的执行结果为 ______。 X=5 Y=-20 If Not X＞0 Then X=Y-3 Else Y=X+3 Print X-Y；Y-X

  A．-3 3 B．5 -8 C．39875 D．25 -25

  查看最佳答案

• 下列程序段的执行结果为______。A=0:B=0For I=-1 To-2 Step-1For J=1 To 2B=B+1Next JA=A+1Next I

  下列程序段的执行结果为______。 A=0:B=0 For I=-1 To-2 Step-1 For J=1 To 2 B=B+1 Next J A=A+1 Next I Print A;B A．2 4 B．-2 2 C．4 2 D．2 3

  查看最佳答案

• 下列程序段的执行结果为______。K=0For I=1 To 3A=I^I^KPrint A;Next IA．1 1 1B．1 4 9C．0 0 0D．1

  下列程序段的执行结果为______。 K=0 For I=1 To 3 A=I^I^K Print A; Next I A．1 1 1 B．1 4 9 C．0 0 0 D．1 2 3

  查看最佳答案

• 下列程序段的输出结果为 ______。 int a=2； switch （a) case 2：System.out.print（"Value is 2.")；case 3：System.out.println（"Value is.")；break；default：System.out.println（"end")；break；

  查看最佳答案

• 单击命令按钮后，下列程序代码的执行结果是______ 。 Public Sub fun （Byval a （) As Integer) Static n As Integer Do a（n) = a （n) + a（n + 1) n = n + 1 Loop While n ＜ 3 End Sub Private Sub command1_ click（) Dim m As Integer, n

  查看最佳答案

• 下列程序段运行结束后，消息框中的输出结果是_______。 Dim C As Boolean A=Sqr（3) B=Sqr（2) C=a＞b MsgBox C

  A．-1 B．0 C．False D．True

  查看最佳答案