2. 计算机
  3. 阅读下面程序代码： Private Sub Command1_Click() Dim tem pAs Integer a=Array(2，7，4，10，0，1，8，5，3，9，6) For i=7 To 4 Step-1 For j=3 To i-1 If

阅读下面程序代码： Private Sub Command1_Click() Dim tem pAs Integer a=Array(2，7，4，10，0，1，8，5，3，9，6) For i=7 To 4 Step-1 For j=3 To i-1 If

admin2016-06-22  29
问题 阅读下面程序代码：
Private Sub Command1_Click()
Dim tem pAs Integer
a=Array(2，7，4，10，0，1，8，5，3，9，6)
For i=7 To 4 Step-1
For j=3 To i-1
If a(j)＞a(j+1)Then
temp=a(j)
a(j)=a(j+1)
a(j+1)=temp
End If
Next j
Next i
For i=0 To 10
Print a(i)；
Next i
End Sub
此程序代码运行后的输出是(    )。
选项 A、2 7 4  0 1 5 8 10 3 9 6
B、0 1 23 4 5 6 7 8 9 10
C、2 7 0 1 4 5 8 10 3 9 6
D、2 7 4 10 0 1 3 5 8 9 6
答案A
解析 Array函数用来为数组元素赋值，即把一个数据集读入某个数组。本题利用Array函数，将一组整型数据读入到数组变量a中。利用二重For循环对数组中的部分元素进行排序，循环执行过程中，各变量的值如下表所示。

循环结束后数组中各元素的值依次为：(2，7，4，0，1，5，8，10，3，9，6)；所以A选项正确。
转载请注明原文地址:https://jikaoti.com/ti/2oJ0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)