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

Const n=11

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

k=Val (Text1.Text)

For i=1To 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 Text2.Text=Text2.Text+Str(a(i))

Next i

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

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