问题
单项选择题
下列程序段的执行结果为______。 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 3x=x+m(i,j) Next Next Print x
A．3
B．4
C．5
D．6
答案
参考答案：D
解析：[评析] 通过第一个以i为循环变量的循环，令a(1,1)=1，a(2,2)=2，a(3,3)=3。然后通过双重循环，求数组a中所有元素的和并将结果赋值给x，由于在数组a中除了a(1,1)、a(2,2)和a(3,3)外其他元素都为0，所以x=1+2+3=6。