下面的程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click() Dim a(1 To 6)As Integer Dim mini%,i%,j%,n%,t%,k% a(1)=8

admin2018-09-29  16

问题 下面的程序运行时,单击窗体后,窗体上显示的结果是(    )。
    Private Sub Form_Click()
    Dim a(1 To 6)As Integer
    Dim mini%,i%,j%,n%,t%,k%
    a(1)=8:a(2)=6:a(3)=9:a(4)=3:a(5)=2:
    a(6)=7
    n=6
    For i=1 To n-1
    min1=i
    Forj=i+1 To n
    Ifa(j)<a(min1)Then mini=j
    Nextj
    t=a(i):a(i)=a(min1):a(min1)=t
    Next i
    For i=1 To n
    Print a(i)
    Nexti
    End Sub

选项 A、9 8 7 6 3 2
B、2 3 6 7 8 9
C、9 8 7 6 3
D、2 3 6 7 8

答案B

解析 本题考查循环程序的分析。程序主要包括两条循环语句,一条为两层循环的嵌套语句,内层循环找到当前i到n之间的最小元素的下标,退出内循环则把最小元素放到a(i)的位置,i从1变化到n.1;另外一条循环语句为输出数组中的所有元素,即把排序以后的结果输出。
转载请注明原文地址:https://jikaoti.com/ti/VOm0FFFM
0

最新回复(0)