当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
时间:2022-01-03 23:45关键词:
答案解析
B 解析:本题首先通过一个两层For循环给二维数组a的每一个元素赋初值,赋值的规律是左上右下对角线及该对角线的上半部分的元素赋值为1,该对角线的下半部分元素赋值为0。然后通过一个两层循环分行输出该二维数组,所以第三行为00111。