1.1.2计算机解决问题的步骤_第1页
1.1.2计算机解决问题的步骤_第2页
1.1.2计算机解决问题的步骤_第3页
1.1.2计算机解决问题的步骤_第4页
1.1.2计算机解决问题的步骤_第5页
已阅读5页,还剩8页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

用计算机解决问题的步骤 走进编程 一 课题引入 求下列一元二次方程的根 1 6x2 5x 50 06 5x2 10 x 17 02 3x2 5x 2 07 2 3x2 3x 4 6 03 x2 4x 4 08 2x2 2x 99 04 4x2 3x 2 09 35x2 87x 104 05 7x2 23x 5 010 14x2 x 3 0 二 人求解一元二次方程的过程 例 求解方程6x2 5x 50 0 1 已知方程的三项系数分别是6 5 502 确定解题方法 公式法 因式分解法 用公式法求解方程的根 判别式deta 52 4 6 50 1225 352 03 求得方程的两个根分别为 问 请同学们思考 你打算利用计算机如何来完成这个任务呢 例 利用计算机求解方程6x2 5x 50 0 三 利用计算机解决问题 6x2 5x 50 0 第一步 分析问题 已知方程的各项系数 确定用公式法求解 找出已知和未知 列出已知和未知之间的关系 确定解题方法 第二步 设计算法 用自然语言描述 step1 令a为6 b为5 c为 50 Step2 令deta为b2 4acstep3 如果deta 0则求出x1 x1为x2 x2为转到step4 如果deta 0 转到step5 Step4 输出x1 x2的值 step5 输出无解 算法 简单地说 算法就是解决问题的方法和步骤 第三步 编写程序根据算法编写成计算机程序 使用VB VisualBasic 计算机语言 原因 计算机读不懂算法 必须翻译成计算机的语言 这就是程序设计语言 step1 令a为6 b为5 c为 50 Step2 令deta为b2 4acstep3 如果deta大于或等于0则输出x1 x1为x2 x2为转到step4 否则输出方程无解 转到step5 Step4 输出x1 x2的值 step5 输出 方程无解 DimaAsSingle bAsSingle cAsSingle detaAsSingleDimx1AsSingle x2AsSinglea 6b 5c 50deta b 2 4 a cIfdeta 0Thenx1 b Sqr deta 2 a x2 b Sqr deta 2 a Print x1 x1 x2 x2ElsePrint 判别式小于0 方程无解 EndIf 完整的VB VisualBasic 程序如下 第四步 调试运行程序 检验结果 启动MicrosoftVisualBasic6 0中文版程序设计环境 输入程序代码并进行调试 最后得到运行结果 课堂小结 调试运行程序 人机 问题解决 对比 分析问题 设计算法 得出结果等 计算速度比较慢 计算速度比较快 精确度不高 易出错 编写程序 调试程序 运算速度快 具有一定的自动化 不具有自动化解决

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论