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

admin2018-12-20  25

问题 设有一个有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=a(j)
    Next j
   For i=1 To 10
    Print a(i)
    Next i
    End Sub

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

答案A

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

最新回复(0)