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

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

admin2012-03-22  28
问题 已知数组A(4,4)，各个元素在运行程序时被赋值并打印，形成四除非方阵。请在 ________ 和 ________ 处填所需的内容，使其产生一个转置矩阵(即行列互换)，仍放在数组A中，并打印出来。例如：
   1  2  3  4
   1  2  3  4
   1  2  3  4
   1  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)
解析
转载请注明原文地址:https://kaotiyun.com/show/6Xhp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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