第23学时冒泡算法教学设计_20120402082033750.docVIP

四队中学教案纸 （备课人： 董志红 学科：信息技术 ） 备课时间 教学课题 第23学时：冒泡算法教学设计课时 教学目标 知识和技能目标 掌握冒泡法排序的原理学会用冒泡法对数据进行排序 过程和方法目标 培养学生观察、分析和解决问题的能力、综合应用和创新能力。培养学生团结协作的能力 情感态度和价值目标 培养学生积极思考、精益求精的求学精神和科学态度。 教学重点 用程序实现冒泡排序 教学难点 用程序实现冒泡排序 教学过程： 教学程序 教师活动 学生活动 设计意图 简单介绍 相关知识 向学生简单介绍算法、冒泡法等概念；并向学生介绍多种算法。 学生进行比较讨论。 让学生对算法有一个直接的了解。 游戏回顾 冒泡思想 竞赛游戏一：用冒泡法进行数据排序。以６人为一组，看看哪组最快完成任务。 给每组学生发一组数据，开始游戏。 补充解释算法思想。 展示部分流程图。 展示部分伪代码。 组内讨论冒泡算法思想 组内学生快速地进行两两数据的比较和交换，获胜的小组向全班阐述冒泡算法。 根据算法将流程图和伪代码填写完整。 通过游戏的导入，一方面引起学生的学习兴趣，另一方面也让学生回顾了冒泡算法思想。为下面的教学做好铺垫。 提出任务 “明日之星英语演讲大赛”小组赛已经结束，我们需要对各小组成绩分别进行排序，以决定进入决赛的名单。 明确任务，思考问题。 在学生明白游戏规则的基础上，提出教学要求。 ? 分析任务 ? ? ? ? ? ? 分析任务 教师带领学生一起针对问题提出冒泡排序的程序编写步骤。 （1）从10个文本框中获取原始成绩数据，分别赋值给数组中的元素； （2）对数组中的元素采用冒泡法进行排序； （3）将排好序的数据输出给文本框。 讨论总结伪代码，教师带领学生一起分析所用的控件和变量数组等，讲解控件数组的用法。 在教师的指导下，积极思考，与教师一起归纳步骤。 ? 写出伪代码。 ? ? 学生填写表格。 这是编程的前期分析，让学生进一步明确编程的顺序和要求，主要是为学生下一步编程做好准备。 组织游戏， 深入理解 数据交换 知识 游戏二：请一小组学生演示交换两水杯中的水。 学生商量操作、演示，会发现问题：必须用到第三个杯子，才能实现目标。 通过交换水杯中的水，让学生更深刻地体会到数据交换的原理，为学生理解程序做铺垫。 学生完成编程 ? 教师巡回指导。 用计算机程序设计语言的语句来实现上面的各个步骤：不但应用了已经学过的条件语句以及程序的循环结构，同时还掌握了“冒泡法”的使用。 学生在深刻理解的基础上完成编程。 交流程序进一步巩固 交流程序运行情况，纠正错误。 体验成功，巩固所学知识。 进一步巩固所学知识。 提出新问题：查看排序结果，我们会发现成绩是由低到高排列的，如何实现成绩由高到低排列呢？ 学生尝试，并演示。 附件程序源代码 Private Sub cmdSort_Click() Dim aryPlayer(9) As Integer, intTemp As Integer Dim aryScore(9) As Single, sngTemp As Single Dim i As Integer, j As Integer 从文本框中读入10名选手的编号和成绩 For i = 0 To9 aryPlayer(i) = txtNum(i).Text aryScore(i) = txtScore(i).Text Next 以下代码对成绩排序 For i = 0 To8 For j =9To i +1Step -1 If aryScore(j) aryScore(j -1) Then 交换选手编号 intTemp = aryPlayer(j) aryPlayer(j) = aryPlayer(j -1) aryPlayer(j -1) = intTemp 交换选手成绩 sngTemp = aryScore(j) aryScore(j) = aryScore(j -1) aryScore(j -1) = sngTemp End If Next Next 输出成绩 For i = 0 To9 txtNum(i).Text = aryPlayer(i) txtScore(i).Text = aryScore(i) Next End Sub 教学反思 学生在必修课里已经学习过冒泡排序的算法思想和流程图，因此这部分的重点就在于如何用程序实现算法，这也是本节的难点。