[填空題] 已知數(shù)組A(4，4)，各個元素在運(yùn)行程序時被賦值并打印，形成四階方陣。請在 (11) 和 (12) 處填所需的內(nèi)容，使其產(chǎn)生一個轉(zhuǎn)置矩陣(即行列互換)，仍放在數(shù)組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

Fori=1 To 4

a(k,j):j

Print a(k,j);

Next

Print

Next

For k=2 To 4

Forj=1 To (11)

t=a(j,k)

a(j,k)= (12)

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

正確答案：

[11]a [12]a(k，j)

參考解析：

本題的難點(diǎn)是數(shù)組的下標(biāo)操作。程序的前半部分是產(chǎn)生數(shù)據(jù)，后半部分是數(shù)據(jù)交換?？沾蛴rint操作是換行。