For i=1 To 6
j=7
Do While j>i
If a(j)>a(j-1)Then
a(j)=a(j)+a(j-1):a(j-1)=a(j)-a(j-1):a(j)=a(j)-a(j-1)
End If
j=j-1
Loop
Next i
For i=3 To 6
s=s+a(i)
Next i
Label1.Caption=Str(s)
已知数组元素a(1)到a(7)值依次为“8,2,3,7,10,6,5”,则执行该程序段后,标签Label1中显示的是( )
A.21
B.26
C.41
D.18
【答案】:A
【本题解析】
本题考查冒泡排序算法。程序中第5行代码实现的功能是a(j-1)和a(j)的交换,第一个循环是完成从大到小的冒泡排序,排序完成后a(1)到a(7)分别为“10,8,7,6,5,3,2”,第二个循环是完成a(3)到a(6)的累加,结果为7+6+5+3=21,所以A选项正确。