问题详情

当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。