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

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

admin2010-11-20  26
问题 已知数组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)
解析 本题的难点是数组的下标操作。程序的前半部分是产生数据,后半部分是数据交换。空打印Print操作是换行。
转载请注明原文地址:https://kaotiyun.com/show/y4mp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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