[填空題] 以下程序的功能是：將一維數(shù)組A中的100個(gè)元素分別賦給二維數(shù)組B的每個(gè)元素并打印出來，要求把A(1)～A(10)依次賦給B(1，1)～B(1，10)，把A(11)～A(20)依次賦給B(2，1)～B(2，10)，……，把A(91)～A(100)依次賦給B(10，1)～B(10，10)。請?zhí)羁铡?/p>

Option Base 1

Private Sub Form_Click()

Dim i As Integer,j As Integer

Dim A(1 To 100) As Integer

Dim B(1 To 10, 1 To 10) As Integer

For i=1 To 100

A(i)=Int(Rnd*100)

Next i

For i=1 To (8)

For j=1 To (9)

B(i,j)= (10)

Print B(i,j)

Next j

Print

Next i

End Sub

(8)10 (9)10 (10)A((i-1)*10+j)

從循環(huán)體內(nèi)的B(i，j)可以看出循環(huán)控制變量i和j用于控制二維數(shù)組B的下標(biāo)，二維數(shù)組B的每維大小為10，所以第[8]空和第[9]空均填寫10；第[10]空所在的語句的作用是讀取一維數(shù)組A的各個(gè)元素并賦給二維數(shù)組B，因此根據(jù)題目要求推算一維數(shù)組A的下標(biāo)和二維數(shù)組B的下標(biāo)的對應(yīng)公式，第[10]空應(yīng)填寫A((i-1)*10+j)。