[填空题] 下面的程序实现矩阵的转置(即行列互换)。阅读程序并填空。 Option Base 1 Private Sub Form_Click() m=Input Box(“输入行数”):n=

19 查阅

[填空题] 下面的程序实现矩阵的转置(即行列互换)。阅读程序并填空。

Option Base 1

Private Sub Form_Click()

m=Input Box(“输入行数”):n=InputBox(“输入列数”)

[11] a(m,n)AS Integer,b(n,m)AS Integer

ForI=1 to m

Forj=1 to n

a(I,j)=Int(Rnd*90)+10

Next:Next

ForI=1 to m

Forj=1 to n

b(j,1)= [12]

Next:Next

End Sub

参考答案:

ReDim a(m,n)As Integer

计算机考试