当Form1_Click事件发生时,窗体上显示的第三行是( )。 Dim i As Integer,j As Integer,a(5,5) As Integer For i=1 To 5 For j=1 To 5

admin2009-02-13  74

问题 当Form1_Click事件发生时,窗体上显示的第三行是(    )。    Dim i As Integer,j As Integer,a(5,5) As Integer    For i=1 To 5       For j=1 To 5          If(i<=j)Then             a(i,j)=1          Else             a(i,j)=0          End If       Next j    Next i    For i=1 To 5       For j=1 To 5          Print a(i,j),       Next j       Print    Next i    End Sub

选项 A、0  0  0  1  1
B、0  0  1  1  1
C、0  1  1  1  1
D、1  1  1  1  1

答案2

解析 本题首先通过一个两层For循环给二维数组a的每一个元素赋初值,赋值的规律是左上右下对角线及该对角线的上半部分的元素赋值为1,该对角线的下半部分元素赋值为0。然后通过一个两层循环分行输出该二维数组,所以第三行为0  0  1  1  1。
转载请注明原文地址:https://jikaoti.com/ti/xF80FFFM
0

最新回复(0)