题目内容
执行下列程序后输出如下所示矩阵,填空将程序补充完整。
1 0 0 2
0 3 4 0
0 5 6 0
7 0 0 8
Private SubCommand1_Click()
Dim a(4,4)
For i=1 To 4
For i=1 To 4
If【 】Then
【 】
a(i,j)=k
Else
a(i,j)=0
End If
Print a(i,j);
Next i
Print
Next i
End Sub
查看答案
搜索结果不匹配?点我反馈