单项选择题
设整型数组a有10个元素,其中前9个元素中数已按小到大顺序排列,下面程序段的作用是______。
x = InputBox("请输入一个整数")
k = 8
Do
If x > = a(k) Then
a(k+1) = x
Exit Do
Else
a(k + 1) = a(k)
If k = 0 Then a(k) = x
k = k - 1
End If
Loop Until k < 0
A.把x中的数插入数组a,使数组中的数仍然保持从小到大的顺序
B.在数组a中找到小于或等于x的数,把x中的数放到这个数的后面
C.把x中的数放到下标为0的数组元素中
D.把数组a中的数依次后移,然后把x中的数放到数组的最前面
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
有下面程序代码:Private Sub Command1_Click( )Dim a%(10)For k = 1 To 9a(k) = InputBox( )Next. kCall proc(a( ), 6, 3, 10)For k = 1 To 10Print a(k); ;Next kEnd SubPrivate Sub proc(a%( ), x%, m%, n%)For k = n To m + 1 Step -1a(k) = a(k - 1)Next ka(k) = xEnd SubCommand1_Click过程运行时,从键盘输入9个数:12 32 65 34 87 56 79 50 52,则输出是______。
A.12 32 65 34 87 56 79 50 52
B.6 12 32 65 34 87 56 79 50 52
C.12 32 65 34 87 56 79 50 52 6
D.12 32 6 65 34 87 56 79 50 52
点击查看答案&解析
单项选择题
有下面程序代码:Private Sub Commandl_Click( )Dim aa = Array(1, 2, 3, 4, 5)Call proc(A)For k = 0 To 4Print a(k);Next kEnd SubPrivate Sub proc(ByVal x)For k = LBound(x)To UBound(x)x(k) = x(k) * 2Next kEnd Sub运行Command1_Click过程产生的输出是______。
A.2 4 6 8 10
B.1 2 3 4 5
C.5 4 3 2 1
D.10 8 6 4 2
点击查看答案&解析
相关试题
为了把文本框Text1中输入的小写字母的大写...
有下面程序代码:Private Sub Command1...
在窗体上画一个名称为Command1的命令按钮...
有如下程序:Private Sub Form_Click(...
设程序中使用了多个窗体,下面叙述中正确的...