[填空題] 下面的程序?qū)崿F(xiàn)矩陣的轉(zhuǎn)置(即行列互換)。閱讀程序并填空。 Option Base 1 Private Sub Form_Click() m=I
2021-07-20
[填空題] 下面的程序?qū)崿F(xiàn)矩陣的轉(zhuǎn)置(即行列互換)。閱讀程序并填空。
Option Base 1
Private Sub Form_Click()
m=InputBox(“輸入行數(shù)”):n=InputBox(“輸入列數(shù)”)
(11) a(mn)As Integer,b(n,m)As Integer
For I=1 to m
For i=1 to n
a(I,j)=Int(Rnd*90)+10
Next:next
For I=1 to m
Forj=1 to n
b(j,I): (12)
Next:Next
End Sub
正確答案:[11]Redim[12]a(I,j)
參考解析:重定義數(shù)組維度使用Redim函數(shù)。 b數(shù)組為轉(zhuǎn)置后需要的數(shù)組,a數(shù)組為原值數(shù)組,所以本空賦值操作一定是引用a數(shù)組的元素的值。b(j,I)為行列互換后的轉(zhuǎn)置元素,所以對(duì)應(yīng)原值應(yīng)為a(I,j)。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。