题目

【加试题】有如下VB程序段:   Dim a(1 To 8) As Integer   a(1) = 12: a(2) = 44: a(3) = 65: a(4) = 26 a(5) = 48: a(6) = 91: a(7) = 98: a(8) = 13   n = 8: t = 0   For i = 1 To n - 1     k = i     For j = i + 1 To n       If a(j) < a(k) Then k = j     Next j     If k <> i Then       temp = a(i): a(i) = a(k): a(k) = temp: t = t + 1     End If   Next i   Text1.Text = Str(t) 该程序段运行后,文本框Text1中显示的内容是(  ) A . 5 B . 7 C . 8 D . 28 答案:A
信息技术 试题推荐