当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 忆知数组A(4,4),各个元素在运行程序时被赋值并打印,形成四除非方阵。请在 【10】 和 【11】 处填处所需的内容,使产生一个转置矩阵(即行列互换),仍放在数组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

  

参考答案:

[A0]a
[AA]a(k,j)

  参考解析

本题的难点是数组的下标操作。程序的前半部分是产生数据,后半部分是数据交换。空打印Print操作是换行。

微信端