- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 算法实例
- + 面向对象程序设计 VB开发工具
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- 赋值语句
- 选择语句
- 循环语句
- 算法实例的程序实现
- 算法及算法的表示方法
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
简答题：
身体质量指数（BMI）是衡量身体健康与否的标准之一。科学家经过大量的统计、分析，推导出计算公式为：BMI=w/(h×h)，其中w表示体重（单位为千克），h表示身高（单位为米）。一般认为其值在20至25之间为“健康”，否则认为“欠健康”。编写程序，输入某个人的身高和体重，判断并输出他（她）健康与否。
（1）解决问题的算法通常有：解析法、递归法、冒泡排序法、二分查找法等，本题主要适合采用上述哪种算法？
（2）根据题意，完善流程图。
（3）根据流程图，补充代码。
身体质量指数（BMI）是衡量身体健康与否的标准之一。科学家经过大量的统计、分析，推导出计算公式为：BMI=w/(h×h)，其中w表示体重（单位为千克），h表示身高（单位为米）。一般认为其值在20至25之间为“健康”，否则认为“欠健康”。编写程序，输入某个人的身高和体重，判断并输出他（她）健康与否。
（1）解决问题的算法通常有：解析法、递归法、冒泡排序法、二分查找法等，本题主要适合采用上述哪种算法？
（2）根据题意，完善流程图。
（3）根据流程图，补充代码。
| Rem VB代码 Dim BMI As Single Dim h As Single Dim w As Single h = Val(InputBox("输入身高")) w = Val(InputBox("输入体重")) BMI =" w" / (h * h) If (BMI >=" 20" And ________________) Then Print "健康" ____ Print "欠健康" End If | //JAVA代码 public class BMI { public static void main(String args[]) { float BMI; float h=Float.parseFloat(args[0]); float w=Float.parseFloat(args[1]); BMI=w/(h*h); if(BMI>="20" && ________________) System.out.println("健康"); ____ System.out.println("欠健康"); } } |
一个完整的Visual Basic块If语句如下,则划线处应填入的语句是（ ）
If a>b then
Max=a
Max=b
End if
If a>b then
Max=a
Max=b
End if
| A．Else | B．End if | C．Else if | D．If |
判断点P(x,y)在圆内(圆的轨迹方程为：x2+y2=4)的VB表达式是_______。
| A．x*x+y*y>4 | B．x*x+y*y<=4 | C．x<2 Or y<2 | D．x<2 And y<2 |
某Visual Basic程序如下：
Private Sub Command1_Click()
Dim x As Integer, y As Integer ,a As Integer ,b As Integer
X="0"
y=0
For a="1" To 3
x=x+1
For b="2" to 4
y=y+1
Next b
Next a
Text1.text=str(a)
Text2.text=str(b)
End Sub
单击Command1按钮后，Text1显示 ① ，Text2显示 ② 。
Private Sub Command1_Click()
Dim x As Integer, y As Integer ,a As Integer ,b As Integer
X="0"
y=0
For a="1" To 3
x=x+1
For b="2" to 4
y=y+1
Next b
Next a
Text1.text=str(a)
Text2.text=str(b)
End Sub
单击Command1按钮后，Text1显示 ① ，Text2显示 ② 。
有如下Visual Basic程序段：
Dim i As Integer, s As Integer
s ＝ 0
i ＝ 1
n ＝ 5
Do While i <＝20
s ＝ s ＋ i ＋ n
i ＝ i * 5
Loop
该程序段运行后，变量i的值是________，变量s的值为________。
Dim i As Integer, s As Integer
s ＝ 0
i ＝ 1
n ＝ 5
Do While i <＝20
s ＝ s ＋ i ＋ n
i ＝ i * 5
Loop
该程序段运行后，变量i的值是________，变量s的值为________。
阅读分析以下VB程序，该程序采用的算法是_______。
Private Sub Command1_Click()
Dim x As Integer, c As Integer, i As Integer
x = Val(Text1.Text)
c =" 0"
Text2.Text = Str(c)
End Sub
Private Sub Command1_Click()
Dim x As Integer, c As Integer, i As Integer
x = Val(Text1.Text)
c =" 0"
| A．解析 For i =" 1" To x If x Mod i = 0 Then | B．查找 c =" c" + 1[:Zxxk.Com] List1.AddItem Str(i) | C．排序 End If Next I | D．枚举 |
End Sub
在VB中，下列选项不能实现交换变量a和b的值的是_______。
| A．a=a+b:b=a-b:a=a-b | B．t=b:b=a:a=t | C．t=a:a=b:b=t | D．a=b:b=a-b:b=a |