更多"下列程序段的执行结果为 ______。 Dim m(3，3)As I"的相关试题:
[单项选择]下列程序段的执行结果为______。
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 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 MyInt As Integer
Dim MyLen
MyLen=Len(MyInt)
执行以上程序段后，MyLen为______。
[填空题]下列程序段的执行结果为 【13】 。
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)
[填空题]下列程序段的执行结果为 【13】 。
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)
[单项选择]下列程序段的执行结果为
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
Ａ) 1 0 0
0 1 0
0 0 0
Ｂ) 1 1 1
1 1 1
1 1 1
Ｃ) 0 0 0
0 0 0
0 0 0
Ｄ) 1 0 1
0 1 0
1 0 1
[单项选择]下列程序段的执行结果为
Dim A(3，3)
For M=1 To 3
For N=1 To 3
If N=M Or N=3-M+1 Then
A. Ｂ)
B. Ｃ)
C. Ｄ) 1 1
D. 1 0
E. 1 1
[单项选择]下列程序段的执行结果是( )。
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(N,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
[单项选择]下列程序段的执行结果为( )。
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
B. 1 1 1
C. 0 0 0
D. 1 0 1
[填空题]下列程序段的执行结果为 (7) 。
Dim A(10,10)
For i=2 To 4
For i=4 To 5
a(i，j)=i*j
Next j
Next i
Print A(2,5)+A(3,4)+A(4,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)
[填空题]下列程序段运行结果是______。
Dim c As Integer,num As Integer
Num=29483
Do
c=num Mod 10
Print c；
num=num/10
Loop While num＜＞0
