选择法排序程序设计导学案.doc

第二章 算法实例（三） 选择排序程序设计导学案一、课程学习目标重点难点重点：选择排序的过程；选择排序算法的程序设计；冒泡排序与选择排序的比较；难点：选择排序算法的程序设计学科指导意见教学要求：1、初步掌握选择排序算法；会考考纲知识条目考试要求选择排序算法及程序实现 c 高考考纲选择排序算法及程序实现c二、基础知识建构1、选择排序法选择排序的基本思想：在所有的记录中从前往后选出最小(大)的数据，把它与第一个数据交换，然后在其余的记录中从前往后再选出最小（大）的数据与第二个数据交换，依此类推，直至所有数据排序完成。 思考：选出最小（大）的数据过程？min范例1：数组D（1to 8）中的8个数据如下：12、15、24、8、31、15、11、10。现利用选择排序法进行升序排列。各趟的排序后的结果为：原始数据121524831151110第一趟结果815241231151115第二趟结果810241231151115第三趟结果810111231152415第四趟结果810111231152415第五趟结果810111215312415第六趟结果810111215152431第七趟结果810111215152431探究学习：请把数组D（1to 8）中的8个数据如下：4、26、12、26、8、31、17、21。现利用选择排序法进行排序。并写出各趟排序后的数据的序列。第一趟结果第二趟结果第三趟结果第四趟结果第五趟结果第六趟结果第七趟结果选择排序法程序界面与代码：Dim 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 = i For j = i + 1 To 8 如果找到更小的，用min记住它的编号 If Then Min = j Next j If Min i Then 如果最小的数所在的位置不是i，则交换 End IfFor i = 1 To 8 在列表框list2中显示排序后的数据Next iNext iEnd SubPrivate Sub Command3_Click() 清空列表数据 清空列表框list1 清空列表框list2End Sub3、冒泡排序与选择排序的比较、对两个相同的数据的排序 在冒泡排序后， (填“不会”或“可能会”)改变原数据中相同数据的原本的先后顺序 在选择排序后， (填“不会”或“可能会”)改变原数据中相同数据的原本的先后顺序、排序的效率 选择排序比冒泡排序效率要 （数据交换