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

admin2012-09-07  17

问题 下面的程序运行时,单击窗体后,窗体上显示的结果是(    )。
    Private Sub Form_Click()
    Dim a(1 To 6)As Integer
    Dim min1%,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)            Next j
            t=a(i):a(i)=a(min1):a(min1)=t
        Nexti
        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/faO0FFFM
0

随机试题
最新回复(0)