内容正文:
专题2 解析和枚举算法及VB程序实现
· 【学习目标】通过具体实例的求解,让学生理解解析和枚举算法解决问题的基本思想,用VB程序代码实现算法解决问题的思路,体验使用计算机解决生活问题的优越性。
一、解析算法
1. 解析算法的定义:用解析的方法找出表示问题的前提条件与所求结果之间关系的数学关系表达式,并通过表达式的计算来实现问题求解。
2. 解析算法的解题思路
(1)明确问题的前提条件——输入;
(2)明确要求的解——输出;
(3)寻找前提条件与结果之间的数学表达式——处理。
3. 解析算法的结构:根据具体问题具体分析,解析算法没有固定的结构(顺序、选择、循环结构)。
▲学习任务一:解析算法(顺序结构实现)
【练习1】储蓄顾问:银行要改善为储户的服务,将设计一个计算机程序,专门回答储户如下的问题:“M元钱需要存多少年,才能得到至少K元本息?”(假定银行公布的储蓄规则为:① 存期以年为单位,存款以元为单位;② 不论存期的长短,年利率均为2.8%;③不计复利。)
Private Sub Command1_Click()
Dim x As Double
m = Val(Text1.Text) ‘输入
k = Val(Text2.Text)
‘处理
y = Fix(x)
If y < x Then y = y + 1
Text3.Text = "存款应为" + Str(y) + "年" ‘输出
End Sub
【练习2】已有的研究成果表明,海拔每升高100米,年平均气温降低0.5℃。编写程序输入山下的气温及山顶的相对海拔高度,输出山顶的气温。
Private Sub Command1_Click()
t0 = Val(InputBox(“输入山下的气温:"))
h= Val(InputBox(“输入山顶的相对海拔高度:"))
t=
Print “山顶的气温为:", t
End Sub
▲学习任务二:解析算法(选择结构实现)
某地出租车咪表(小数部分四舍五入)进行计费,规则如下:3公里(包括3公里