义乌六中“315”导学案信息技术1第二章 算法实例（三）选择排序程序设计导学案一、课程学习目标重点难点重点：选择排序的过程；选择排序算法的程序设计；冒泡排序与选择排序的比较；难点：选择排序算法的程序设计学科指导意见教学要求：1、初步掌握选择排序算法；知识条目 考试要求选择排序算法及程序实现 c会考考纲选择排序算法及程序实现 c高考考纲二、基础知识建构1、选择排序法选择排序的基本思想：在所有的记录中从前往后选出最小(大)的数据，把它与第一个数据交换，然后在其余的记录中从前往后再选出最小（大）的数据与第二个数据交换，依此类推，直至所有数据排序完成。思考：选出最小（大）的数据过程？范例 1：数组 D（1to 8）中的 8 个数据如下：12、15、24、8、31、15、11、10。现利用选择排序法进行升序排列。 min义乌六中“315”导学案信息技术2各趟的排序后的结果为：原始数据 12 15 24 8 31 15 11 10第一趟结果 8 15 24 12 31 15 11 15第二趟结果 8 10 24 12 31 15 11 15第三趟结果 8 10 11 12 31 15 24 15第四趟结果 8 10 11 12 31 15 24 15第五趟结果 8 10 11 12 15 31 24 15第六趟结果 8 10 11 12 15 15 24 31第七趟结果 8 10 11 12 15 15 24 31探究学习：请把数组 D（1to 8）中的 8 个数据如下：4、26、12、26、8、31、17、21。现利用选择排序法进行排序。并写出各趟排序后的数据的序列。第一趟结果第二趟结果第三趟结果第四趟结果第五趟结果第六趟结果第七趟结果选择排序法程序界面与代码：义乌六中“315”导学案信息技术3Dim d(1 To 8) As Integer 定义一个数组Private Sub Command1_Click() 产生 8 个随机数Dim i As Integeri=1For i = 1 To 8产生0，100）之间的随机数存放在数组 d 中List1.AddItem Str(d(i)Next iEnd SubPrivate Sub Command2_Click() 对 8 个数进行选择法排序Dim i as Integer, j as integer, k as integer , min as integeri=1For i = 1 To 7 选择第 i 个数假设为最小的数Min = iFor j = i + 1 To 8 如果找到更小的，用 min 记住它的编号If Then Min = j Next jIf Min i Then 如果最小的数所在的位置不是 i，则交换End IfFor i = 1 To 8在列表框 list2 中显示排序后的数据Next iNext iEnd SubPrivate Sub Command3_Click() 清空列表数据清空列表框 list1清空列表框 list2End Sub义乌六中“315”导学案信息技术43、冒泡排序与选择排序的比较、对两个相同的数据的排序在冒泡排序后， (填“不会”或“可能会”)改变原数据中相同数据的原本的先后顺序在选择排序后， (填“不会”或“可能会”)改变原数据中相同数据的原本的先后顺序、排序的效率选择排序比冒泡排序效率要 （数据交换次数的多少）、对 n 个数据排序的趟数均要进行 趟三、小结1、选择排序的过程；2、选择排序算法的程序设计；3、冒泡排序与选择排序的比较；