下列程序段的执行结果为______。 Dim m(3,3)As Integer Dim i As Integer Dim j As Integer Dim x As Integer Fori=1 To 3 m(i

admin2010-03-30  65

问题 下列程序段的执行结果为______。    Dim m(3,3)As Integer    Dim i As Integer    Dim j As Integer    Dim x As Integer    Fori=1 To 3        m(i.i)=i    Next    Fori=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

答案8

解析 通过第一个以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。
转载请注明原文地址:https://jikaoti.com/ti/H7q0FFFM
0

随机试题
最新回复(0)