计算机解决问题的过程
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
第二节计算机解决问题的过程
教学目标:
了解计算机解决问题的过程
让学生了解解决问题的方法
教学重点:
了解计算机解决问题的过程
教学课时 1课时
教学过程:
[引言]
我们知道,计算机完成某项任务是由软件控制的,计算机是如何解决这些问题的呢?下面就让我们一起学习计算机解决问题的过程。
问题分析:
利用计算机解决问题时,首先要进行问题分析。
例如,铁路托运行李,从甲地到乙地,按规定,每张客票托运行李不超过50公斤时,每公斤1.3元,如超过50公斤,超过的部分按每公斤1.8元计算。假设行李重量为W公斤,运费为F元。计算机如何自动计算出每件行李应付的运费呢?
首先要判断行李的重量是否超过50公斤,如果行李重量W没有超过50公斤,刚按公式:F=1.3*W ,如果超过则需要按下列公式进行计算:F=50*
1.3+(W-50)*1.8
确定算法
下图就是程序设计中常用的流程图,我们可以用它来描述计算机处理问题的过程。这种对解题方法和步骤的描述就称为算法,算法可以用任何形式的语言或符号来描述。
程序设计
首先设计出程序的界面。如图所示:
然后双击“计算”按钮打开程序编写窗口,输入程序代码,如图所示
双击“计算”按钮打开程序编写窗口,输入程序代码。
Private Sub cmdaccount_Click()
Dim F As Integer '定义变量F
Dim W As Integer '定义变量W
W = CInt(Txtw.Text) '得到用户输入的值
If W <= 50 Then '判断W的值
F = W * 1.3 '计算当W的值小于等于50
Else
F = 50 * 1.3 + (W - 50) * 1.8 '计算当W的值大于50
End If
Txtf.Text = CStr(F) '在文本框中显示计算结果
End Sub
此时,我们的程序就已经编写完毕,单击“运行/启动”启动程序,在上面的文本框中输入行李重量,按“计算”按钮,计算机就会自动计算出运费了。检查一下,看看计算机算得对不对。
运行调试
运行时很可能会出现错误,在程序运行中查找并修改错误的过程,就称为是程序调试。
保存
首先保存窗体文件,单击“文件/保存Form1”,然后再保存工程文件,单击“文件/保存工程”
小结:
利用VB开发应用程序的基本过程
1 用户界面设计:创建应用程序界面,并设置窗体对象和控件的属性。
2 编写程序:首先进行事件分析,然后编写事件过程代码。事件分析一定要准确,准确的分析可以使得编写程序变得容易,否则,在使用程序时,将无法得到需要的结果。
3 运行调试:
4 保存:开发工作完成后,如果不保存将前功尽弃。保存至少要生成两个文件,即窗体文件(扩展名为frm)和工程文件(扩展名为vbp)。
课后自测
1 简述计算机解决问题的过程。
2 某公园规定,身高1.2米以上全票,身高1.2米以下且1.0米以上半票,1.0米以下免票。输入不同的身高,计算该参观者应该购买何种类型票。