[填空題] 下列程序的功能是：單擊窗體時將隨機生成20個兩位數(shù)依次賦值給一個由20個元素組成的數(shù)組，然后把數(shù)組反序存放，再輸出。

Option Base 1

Private Sub Form_Click()

Dim a(20) As Integer,i As Integer

Dim t As Integer,j As Integer

Randomize

For i=1 To 20

a(i)=10+Int(90*Rnd)

Print a(i)；

Next i

Print

i=1： 【9】

Do While i＜j

t=a(i)： 【10】 ：a(i)=t

i=i+1：j=j-1

Loop

For i=1 To 20

Print a(i)；

Next i

Print

End Sub

[9]j=20 [10]a(i)=a(j)

數(shù)組逆序存放其實就是把數(shù)組的第一個元素和最后一個元素交換，第二個元素和倒數(shù)第二個元素交換，直到所有的元素都交換完畢。算法可描述如下：用變量i記下第一個元數(shù)的下標(biāo)1，用變量i記下最后一個數(shù)的下標(biāo)20;交換a[i]和a[j]；i加1指向后一個元素，j減1指向前一個元素：重復(fù)上述步驟，直到i≥j為止。[9]處應(yīng)填給j賦最后一個元素的下標(biāo)，為“j=20”。[10]處是a(i)和a(j)交換的一條語句，應(yīng)填“a(i)=a(j)”。