组卷题库 > 高中信息技术试卷库
试题详情
有如下 VB 程序段:

Dim a(l To n) As Integer,y(l To n) As Integer, i As Integer, j As Integer

k=Val(Text1.Text)

For i=1 To n

    y(i)=1

Next i

For i=1 To n

    For j=1 To n

        If a(i) < a(j) Then y(i)=y(i)+1

    Next j

    If y(i)=k Then List1.AddItem Str(a(i))

Next i

数组 a 的各元素的值为3,4,3,1,4,4,5,5,6,2,0, 在文本框中输入4,执行该段程序后 List1 中显示的值为(    )

A、3
B、
C、
D、
知识点
参考答案
采纳过本试题的试卷
教育网站链接