Question

VB输出结果是多少

Private Sub Form_Click()

Dim ia, i%, n%, t%

n = InputBox("enter N=?")

ia = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10)

For i = 1 To n \ 2

t = ia(i): ia(i) = ia(n - i +1): ia(n - i + 1) = t

Next i

For i = 0 To UBound(ia)

Print ia(i);

Next i

End Sub

程序运行后，单击窗体，输入数据为6，则输出结果为

Answer 1

输出结果是1,7,6,5,4,3,2,8,9,10
n \ 2的结果为3

t = ia(i): ia(i) = ia(n - i +1): ia(n - i + 1) = t是把从下标为1的数据与下标为n的数据进行首尾交换，