以下程序的作用是生成一个如下图的矩阵,该程序不完整,请补充完改程序。 Private Sub Command1_Click() Dim A(3,3) For M=1 To 3 For N=1 To 3

admin2010-03-30  26

问题 以下程序的作用是生成一个如下图的矩阵,该程序不完整,请补充完改程序。

   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
   Print
   Next M
      End Sub

选项

答案N=3-M+1, A(M,N)

解析
转载请注明原文地址:https://jikaoti.com/ti/WFq0FFFM
0

最新回复(0)