[填空題] 已知數(shù)組A(4,4),各個(gè)元素在運(yùn)行程序時(shí)被賦值并打印,形成四除非方陣。請(qǐng)?jiān)赺_____和______處填寫所需的內(nèi)容,使其產(chǎn)生一個(gè)轉(zhuǎn)置矩陣(即行列
2021-07-20
[填空題] 已知數(shù)組A(4,4),各個(gè)元素在運(yùn)行程序時(shí)被賦值并打印,形成四除非方陣。請(qǐng)?jiān)赺_____和______處填寫所需的內(nèi)容,使其產(chǎn)生一個(gè)轉(zhuǎn)置矩陣(即行列互換),仍放在數(shù)組A中,并打印出來。例如: 1 1 1 1 2 2 2 2 3 3 3 3 4 4 4 4 Private Sub Command1_Click() Dim s(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 [10] t=a(j,k) a(j,k)= [11] 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
正確答案:[10] a
參考解析:[11] a(k,j) 本題的難點(diǎn)是數(shù)組的下標(biāo)操作。程序的前半部分是產(chǎn)生數(shù)據(jù),后半部分是數(shù)據(jù)交換??沾蛴rint操作是換行。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。