以下程序的作用是生成一个如下图的矩阵,该程序不完整,请补充完改程序。
Private Sub Command1_Click()
Dim A(3,3)
For M=1 To 3
For N=1 To 3
If N=M Or【 】Then
A(M,N)=1
Else
【 】=0
End If
Next N
Next M
For M=1 To 3
For N=1 To 3
Print A(M,N);
Next N
Next M
End Sub
第1题
第3题
第4题
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!