当前位置: 高中信息技术 / 单选题
  • 1. 有如下 VB 程序段:

    For i = 1 To 6

      a(i) = Int(Rnd * 20) + 1: b(i) = i

    Next i

    For i = 1 To 5

      For j = i+1 To 6

        If a(b(i))>a(b(j)) Then

          t = b(j):   b(j) = b(i):   b(i) = t

        End If

      Next j

    Next i

    i = 1 : j = 6: s="" : Key = Val(Text1.Text)

    Do While i <= j

      m = (i + j) \ 2

      If Key = a(b(m)) Then Exit Do

      If Key < a(b(m)) Then j = m - 1 Else i = m + 1

      s = s + Str(m)

    Loop

    Text2.Text = s

    在文本框Text1中输入10,运行以上程序段后,文本框Text2中显示的内容为 3 5 4,则 a 数组中 a(1)到 a(6)各元素的值可能的是(    )

    A . 11,6,4,13,18,15 B . 4,5,8,19,10,17 C . 2,11,7,6,3,18 D . 9,2,11,21,5,16

微信扫码预览、分享更方便