![[填空题] 设有一个10个元素的数组，下列程序将该数组的第一个元素与第十个元素交换，第二个元素与第九个元素交换……，第五个元素与第六个元素交换，请补充完该程序。 Private Sub Commnd1](http://www.mshxw.com/aiimages/31/253777.png "[填空题] 设有一个10个元素的数组，下列程序将该数组的第一个元素与第十个元素交换，第二个元素与第九个元素交换……，第五个元素与第六个元素交换，请补充完该程序。 Private Sub Commnd1")
[填空题] 设有一个10个元素的数组，下列程序将该数组的第一个元素与第十个元素交换，第二个元素与第九个元素交换……，第五个元素与第六个元素交换，请补充完该程序。 Private Sub Commnd1_Click() Dim a(1 To 10)As Integer Dim i As Integer Dim p As Integer Dim t As Integer Dim j As Integer For i=1 To 10 a(i)=i Next i For j=1 To 5 【9】 【10】 【11】 Next j For i=1 To 10 Print a(i) Next i End Sub
参考答案：
[9] t=a(j) [10] a(j)=a(10-j+1) [11] a(10-j+1)=t问题解析:
解析无
