- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 算法实例
- 面向对象程序设计 VB开发工具
- 算法实例的程序实现
- 算法及算法的表示方法
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
下图所示的算法流程图：
执行情况如下：当输入a，b的值为3，8时，输出结果为5；当输入a，b的值为11，7时，输出结果为4。
（1）下列流程图填入虚线框中，符合条件的是________。
（2）依据（1）中所选流程图，当输入a、b的值分别为9、6时，输出结果为________。
执行情况如下：当输入a，b的值为3，8时，输出结果为5；当输入a，b的值为11，7时，输出结果为4。
（1）下列流程图填入虚线框中，符合条件的是________。
A． | B． | C． |
分析完善程序。
以下是求解一元二次方程ax2+bx+c=0(a≠0)的主要VB程序片段，请你补全代码：
a=Val(InputBox(“a=”))
b=Val(InputBox(“b=”))
c=Val(InputBox(“c=”))
d=________________________’求判别式d
If d>0 Then
x1=(-b+Sqr(d))/(2*a)
x2=(-b-Sqr(d))/(2*a)
Print “x1=”;x1
Print “x2=”;x2
End If
If ________________ Then
Print”x=”;-b/(2*a)
End If
If d<0 Then
Print “无实数解！”
End If
以下是求解一元二次方程ax2+bx+c=0(a≠0)的主要VB程序片段，请你补全代码：
a=Val(InputBox(“a=”))
b=Val(InputBox(“b=”))
c=Val(InputBox(“c=”))
d=________________________’求判别式d
If d>0 Then
x1=(-b+Sqr(d))/(2*a)
x2=(-b-Sqr(d))/(2*a)
Print “x1=”;x1
Print “x2=”;x2
End If
If ________________ Then
Print”x=”;-b/(2*a)
End If
If d<0 Then
Print “无实数解！”
End If
下列语句属于三种结构中的哪一种（）
X=100
If X<0 then
Y=abs(X)
Else
Y=sqr(X)
End if
X=100
If X<0 then
Y=abs(X)
Else
Y=sqr(X)
End if
| A．循环结构 | B．顺序结构 | C．选择结构 | D．三项都是 |
以下程序段语句执行后，Y的值是( )
X=16
If X<0 then
Y=abs(X)
Else
Y=sqr(X)
End if
X=16
If X<0 then
Y=abs(X)
Else
Y=sqr(X)
End if
| A．4 | B．其他三项都不对 | C．16 | D．256 |
下列递归算法的功能是计算正整数n阶乘的值，则划线处应填为______________
Function f(n As Integer) As Long
If n < = 1 Then
f = 1
Else
f = _________________
End If
End Function
Function f(n As Integer) As Long
If n < = 1 Then
f = 1
Else
f = _________________
End If
End Function
VB程序中“Dim n As Integer”这条语句的作用是（ ）
| A．定义一个变量 |
| B．定义一个数据处理方法 |
| C．定义一个数据输入方法 |
| D．定义一个事件过程 |