题目

数组a中各元素在列表框List1中以“个数逐行递增”的形式分布如图所示，在文本框Text11中输人行号，单击“排序”按钮，对该行数据做排序处理，并将排序之后的数据显示在文本框Text2。VB程序段如下： Dim a(1 To 15) As Integer '生成数组a， a(1)=24：a(2)= 17：a(3)=21： a(4)=15：a(5)=14    …代码略 n= Val(Text1. Text) For i=1 To n-1     For j=(n+1) * n/2 To   ①   Step-1         If   ②   Then             t=a(j)：a(j)=a(j- 1)：a(j- 1)=t         End If     Next j Next i '将处理后的数组，以金字塔形显示，代码略 上述程序段中①②处的语句分别为(    ) A . (n-1) *n/2+1+I    a(j)>a(j- 1) B . (n-1) *n/2+1+i    a(j)<a(j-1) C . (n+1) * n/2+i-1    a(j)<a(j-1) D . (n+1) * n/2+i-1    a(j)>a(j-1) 答案：B

查看本题答案和解析