2. 计算机
  3. 执行下列程序后输出如下所示矩阵，填空将程序补充完整。 1 0 0 2 0 3 4 0 0 5 6 0 7 0 0 8 Private SubCommand

执行下列程序后输出如下所示矩阵，填空将程序补充完整。 1 0 0 2 0 3 4 0 0 5 6 0 7 0 0 8 Private SubCommand

admin2009-03-15  29
问题 执行下列程序后输出如下所示矩阵，填空将程序补充完整。
   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
选项
答案i=j Or j＝4-i+1 ,k=k+1
解析 通过观察可以发现，只有在主对角线和副对角线上才有数值，而且是渐增的，故当条件成立时，k的值加1。主对角线行列下标的关系为：i＝j，副对角线行列下标的关系为：i+j＝5。
转载请注明原文地址:https://kaotiyun.com/show/AJ1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)