5.2解析算法

课件11张PPT。解析算法
vb常见算法笑一笑在某一集中，猫发现了老鼠，准备实施抓捕，老鼠也发现了猫，准备逃跑，已知二者相距20m，猫速度为v1，老鼠速度为v2，求猫需要多久（t）可追到老鼠？解析算法基本思想找出表示问题的前提条件与结果之间关系的数学表达式，并通过表达式的计算来实现问题求解。
用VB编写解析算法程序时需注意两点：
1、建立正确的数学表达式；
2、将数学表达式转换成正确的VB表达式。追一追Dim v1, v2, t As Double
v1=val(text1.text)
v2=val(text2.text)

text3.text = Str(t)v1*t=v2*t+20 => t=20/(v1-v2)
t=20/(v1-v2)
在某一集中，猫发现了老鼠，准备实施抓捕，老鼠也发现了猫，准备逃跑，已知二者相距20m，猫速度为v1，老鼠速度为v2，求猫需要多久（t）可追到老鼠？例题1.某地打的车费问题收费标准:起步价按1.5公里内6元;超过1.5公里部分每公里运价为2元；超过10公里部分每公里运价为2.5元，用VB编制程序来表示每次打车相应的车费情况。(X表示路程，Y表示车费)Y=6 X≤1.5
Y=6+2（X-1.5） 1.5Y=6+17+2.5（X-10）X>10 数学表达式：程序流程图开始结束输入公里数XX≤1.5Y=6Y=23+2.5*(X-10)输出价格YNYY=6+2*(X-1.5)X≤10YNPrivate Sub Command1_Click()
Dim x As double
Dim y As integer
x = Val(Text1.Text)
？
Text2.Text = Str(y)
End Sub做一做例题2.折纸问题已知一张足够大的纸的厚度s，折叠多少次(i)后超过世界屋脊珠穆朗玛峰的高度8844米？根据问题设计一个能够给出正确答案的算法，并编写程序。……S=S*21S=S*22S=S*2iS>8844?程序流程图开始结束输入纸厚度sS<=8844S=S*2
i = i+1输出次数iNYi =0Private sub command1_click()
Dim i as integer
Dim s as double
s=Val(Text1.Text)
i=0
？
Text2.Text=Str(i)
End sub
做一做课堂小结解析算法的解题思路：
1）明确问题的前提条件
2）明确要求的解
3）寻找前提条件与结果之间的数学表达式解析算法的算法结构有哪些？
输入输出处理顺序分支循环根据具体问题具体分析，解析算法没有固定的算法结构。①②③