更多"下列程序段的执行结果为 Dim A(10,10) "的相关试题:
[单项选择]下列程序段执行后,执行的结果是______ 。
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 4
B. 11 3
C. 3 11
D. 10 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
[单项选择]下列程序段的执行结果为
Dim M(10)
For k=1 To 10
M(K)=11-k
Ncxt k
x=6
Print M(2+M(x))
A 2 B.3 c.4 D.5
[单项选择]下列程序段的执行结果为_______。 Dim m(3,3)As Integer Dim i As Integer Dim j As Integer Dim x As Integer For i=1 To 3 m(i,i)=i Next For i=0 To 3 For j=0 To 3 x=x+m(i,j) Next Next Print X
A. 3
B. 4
C. 5
D. 6
[单项选择]下面程序段执行的结果是
Dim i As Integer,S As Integer
S=0
For i=1 to 10 step 1
S=S+i
Next i
A. S=0
B. S=10
C. 死循环
D. S=55
[单项选择]下列程序段的执行结果为( )。
Dim t(10)
For k=2 To 10
t(k) =11 - k
Next k
X=6
Print t(2+t(x))
A. *
B. > =
C. ::
D. /
[单项选择]设执行以下程序段时依次输入2,4,6,执行结果为( )。
Dim a(4)As Integer
Dim b(4)AS Integer
For k=0 To 2
a(k+1)=Val(InputBox("Enter data:"))
b(3 - k) =a(k + 1)
Next k
Print b(k)
A. 2
B. 4
C. 6
D. 0
[单项选择]下列程序段的执行结果为 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
[单项选择]设执行以下程序段时依次输入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
[单项选择]以下程序段的执行结果是 ______。
Dim a As Integer,b As Integer
For a=4 To 1 Step-1
b=b+a
Next a
Print b, a
A. 100
B. 9 1
C. 10 1
D. 90
[单项选择]下列程序段的执行结果为 Dim t(10) For k=2 To 10
t(k) =11 - k Next k X=6 Print t(2+t(x))
A. 2
B. 3
C. 4
D. 5
[单项选择]下列程序段的执行结果为( )。 Dim A(3,3) For M=1 To 3 For N=1 To 3 If N=M Or N=3-M+1 Then A(M, N)=1 Else A(M,N)=0 End If Next N Next M For M=1 To 3 For N=1 To 3 Print A(M,N) Next N Print Next M
A. 1 0 0 0 1 0 0 0 1
B. 1 1 1 1 1 1 1 1 1
C. 0 0 0 0 0 0 0 0 0
D. 1 0 1 0 1 0 1 0 1
[单项选择]设执行以下程序段时依次输入1、3、5,执行结果为______ 。
Dim a(4)As Integer
Dim b(4) As Integer
For K=0 To 2
a(K+1)=Val(1nputBox(“请输入数据:”))
b(3-K)=a(K+1)
Next K
Print b(K)
A. 1
B. 3
C. 5
D. 0