[填空题] 下面程序的功能是:将数组a中下标值为偶数的元素从小到大排列,其他元素不变。 Dim a(1 To 10),i,j,k For i=1 To 10 a(i):InputBox("

21 查阅

[填空题] 下面程序的功能是:将数组a中下标值为偶数的元素从小到大排列,其他元素不变。 Dim a(1 To 10),i,j,k For i=1 To 10 a(i):InputBox("input:") Next i For i;1 To 10 Print a(i) Next i Print For i=2 To 10 【14】 For j=i+2 To 10 If 【15】 Then t=a(i) a(i)=a(j) a(j)=t End If Next j Next i For i=1 To 10 Print a(i) Next i

参考答案:

[14]step 2 [15]a(i)>a(j)

i循环中假定a[i]最小,j循环中和i后面的偶数下标元素进行比较,如果当前元素a[j]比最小元素 a[i]还要小,就交换。而只对偶数下标的元素比较排序,因此循环变量的步长为2,在空[14]处填step 2。捧序顺序是从小到大,因此应该是后面的元素a(j)小于前面的元素a(i)时,两者交换值,因此在空[15]处填a(i)>a(j)。

计算机考试