2. 计算机
  3. 忆知数组A(4，4)，各个元素在运行程序时被赋值并打印，形成四除非方阵。请在【 】和【 】处填处所需的内容，使产生一个转置矩阵(即行列互换)，仍放在数组A中，并打印出来。例如： 1 2 3 4 1 2 3

忆知数组A(4，4)，各个元素在运行程序时被赋值并打印，形成四除非方阵。请在【 】和【 】处填处所需的内容，使产生一个转置矩阵(即行列互换)，仍放在数组A中，并打印出来。例如： 1 2 3 4 1 2 3

admin2010-03-30  66
问题 忆知数组A(4，4)，各个元素在运行程序时被赋值并打印，形成四除非方阵。请在【  】和【  】处填处所需的内容，使产生一个转置矩阵(即行列互换)，仍放在数组A中，并打印出来。例如：
   1    2    3    4
   1    2    3    4
   1    2    3    4
   l    2    3    4
   1    1    1    1
   2    2    2    2
   3    3    3    3
   4    4    4    4
   Private Sub Command1_Click()
   Dim a(4，4)
      For k=1 To 4
         For j=1 To 4
           a(k，j)=j
           Print a(k，j)；
         Next
         Print
      Next
   For k=2 To 4
   For j=1 To【  】
         t=a(j，k)
         a(j，k)=【  】
         a(k,j)=t
      Next
    Next
   For k=1 To 4
      Print a(k，1)；a(k，2)；a(k，3)；a(k，4)
      Next
   End Sub
选项
答案a,a(k,j)
解析 本题的难点是数组的下标操作。程序的前半部分是产生数据，后半部分是数据交换。空打印 Print操作是换行。
转载请注明原文地址:https://kaotiyun.com/show/vv1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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