设有如下程序：
Dption Base 1
Private Sub Command1_Click()
Dim a(10)As Integer
Dim n As Integer
n=InputBox("输入数据")
If n＜10 Then
Call GetArray(a, n)
End If
End Sub
Private Sub GetArray(h()As Integer, n As Integer)
Dim c(10)As Integer
j=0
For i=1 To n
b(i)=CInt(Rnd()*100)
If b(i)/2=b(i)\2 Then
j=j+1
c(j)=b(i)
End If
Next
print j
Knd Sub
以下叙述中错误的是______。

A．数组b中的偶数被保存在数组c中

B．程序运行结束时，在窗体上显示的是c数组中元素的个数

C．GetArray过程的参数n是按值传送的

D．如果输入的数据大于10，则窗体上不显示任何信息

下列关于各种类型供应链的说法正确的有（）。

A.动态的供应链是指基于相对频繁变化、复杂的需求而组成的供应链

B.倾斜的供应链是指当市场变化加剧，造成供应链成本增加、库存增加等现象时的供应链

C.有效性供应链是指能以最低的成本供应可预测需求的供应链

D.反应性供应链是指对不可预测的需求能够作出快速响应的供应链