设有一个有10个元素的数组,下列程序将该数组的第1个元素与第10个元素交换,第2个元素与第9个元素交换……,第5个元素与第6个元素交换,在横线处应填写( )。 Private Sub Command1_Click() Dim a(1

admin2017-08-22  83

问题 设有一个有10个元素的数组,下列程序将该数组的第1个元素与第10个元素交换,第2个元素与第9个元素交换……,第5个元素与第6个元素交换,在横线处应填写(    )。
    Private Sub Command1_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
    Forj=1 To 5
    t=a0)
    Nextj
    For i=1 To 10
    Print a(i)
    Next i
    End Sub

选项 A、a(j)=a(11-j)  a(11-j)=t
B、a(11-j)=a(j)  a(j)=t
C、a(j)=a(11-j)  a(i)=t
D、a(11-j)=t    a(j)=a(11-j)

答案A

解析 本题考查数组中元素的逆置操作。循环次数为数组中元素个数的一半,每一次都要进行下标之和为11的前后两个元素交换。
转载请注明原文地址:https://jikaoti.com/ti/4Dy0FFFM
0

随机试题
最新回复(0)