- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 算法实例
- 面向对象程序设计 VB开发工具
- 算法实例的程序实现
- 算法及算法的表示方法
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
有如下VB程序段：
Dim a(1 To 6)As Integer
n=6：i=1
Do While i <=n
i-i+1
Else
a(n)=x
n=n-1
End If
Loop执行该程序段后，在下列选项中，a数组各元素的值可能是（ ）
Dim a(1 To 6)As Integer
n=6：i=1
Do While i <=n
x=Int(Rnd * 10)+1
If i Mod 2=x Mod 2 Then
a(i)=xi-i+1
Else
a(n)=x
n=n-1
End If
Loop执行该程序段后，在下列选项中，a数组各元素的值可能是（ ）
| A．3，4，0，6，6，8 | B．1，8，9，11，1，5 |
| C．2，5，8，6，7，10 | D．5，3，3，7，7，3 |
下列选项中，与表达式“m Mod n=0”等价的是（ ）
| A．m\n=Int(m/n) |
| B．m\n=m/n |
| C．mModn=m\n |
| D．m\n=Fix(m/n) |
已知x是一个五位数整数，下面语句中能得到其千位上的数字的是（ ）
| A．X/1 000 | B．x\1 000 | C．x\1 000 mod 10 | D．x mod 10 000\1 000 |
已知a=-2，b=5，c=8，下列表达式的值为False的是（ ）
| A．a+b>b-c And a-c<a-b |
| B．a+c>b-c or Not b<c |
| C．a<c\b Or b>c And a<c |
| D．c mod a<a-b |
若x是大于0的偶数，则下列关系表达式的值一定为真的是（ ）
①x Mod 2=0 ②x\2=0 ③x\2=x/2 ④Int(x/2) <>x/2
①x Mod 2=0 ②x\2=0 ③x\2=x/2 ④Int(x/2) <>x/2
| A．①② | B．①②③ | C．①③ | D．①③④ |
下列表达式的运算结果不等于8的是（ ）
| A．Len("2019选考")+Sqr(4) | B．Abs(Int(-7.8)) |
| C．Val(Mid("789",2,1)) | D．Asc("M")-Asc("e") |
下列能正确表示数学表达式100≥x≥1的VB表达式是（ ）
| A．100≥x And x≥1 | B．100>=x And x>1 |
| C．x>=1 And x<=100 | D．x>=1 Or x<=100 |
某算法部分流程图如图所示。执行这部分流程，依次输入整数-6，9，15，则输出值依次是（ ）
| A．6，1.5，7 | B．6，1，7.5 |
| C．-6，1，7 | D．6，1.5，7，5 |
