选择排序之算法实现ppt课件.ppt

选择法排序之算法实现,1,选择排序的过程：对比数组中前一个元素跟后一个元素的大小，如果后面的元素比前面的元素小则用一个变量k来记住他的位置，接着第二次比较，前面“后一个元素”现变成了“前一个元素”，继续跟他的“后一个元素”进行比较如果后面的元素比他要小则用变量k记住它在数组中的位置(下标)，等到循环结束的时候，我们应该找到了最小的那个数的下标了，然后进行判断，如果这个元素的下标不是第一个元素的下标，就让第一个元素跟他交换一下值，这样就找到整个数组中最小的数了。然后找到数组中第二小的数，让他跟数组中第二个元素交换一下值，以此类推。,2,21,25,49,25*,16,08,123456,21,25*,i=1,49,25,16,25,16,08,49,08,25*,49,21,i=2,i=3,08,16,25*,25,21,初始,最小者08交换21,08,最小者16交换25,16,最小者21交换49,21,3,49,25*,123456,25*,i=5,25,16,08,49,25*,49,21,结果,i=4,08,16,25,21,最小者25*无交换,最小者25无交换,25,21,16,08,各趟排序后的结果,4,1、在选择排序过程中，经过一遍排序“加工”后，数组元素a(l)到a(7)的数据依次为“10，41，75，12，63，11，85”。则下一遍排序“加工”后数组元素a(l)到a(7)的数据依次是A.10,11,41,75,12,63,85B.10,11,75,12,63,41,85C.10,11,12,75,63,41,85D.10,11,12,41,63,75,85,答案：B,5,2、选择排序：在经过一遍排序“加工”后，数组元素a(1)到a(5)的数据依次为“28，70，57，53，30”。则下一遍排序“加工”后数组元素a(1)到a(5)的数据应该是A.28,30，70，53，57B.28,30，53，57，70C.28，30，57，53，70D.28,30，53，70,57,答案：C,6,第1步：找出n个数据(a(1)至a(n)中的最小数，并与第1个数据a(1)交换位置；,选择法排序,第2步：在剩下的n-1个数据(a(2)至a(n)中找出最小数，并与第2个数据a(2)交换位置；,对包含n个数据的数组按从小到大排列,7,第i步：,在剩下的n-i+1个数据(a(i)至a(n)中找出最小数，并与第i个数据a(i)交换位置；,第1步：找出n个数据(a(1)至a(n)中的最小数，并与第1个数据a(1)交换位置；,选择法排序,对包含n个数据的数组按从小到大排列,i=1?,n-1,8,选择法排序的基本算法,找出a(i)至a(n)中的最小值,将最小值与第i个数据a(i)交换位置,9,选择法排序的基本算法,找出a(i)至a(n)中的最小值,将最小值与第i个数据a(i)交换位置,10,一、随机生成10个整数,请用选择法对其进行排序。,PrivateSubCommand1_Click()Dima(1To10)AsIntegerDimiAsInteger,jAsInteger,kAsIntegerk变量代表是找到的最小数Print排序以前的数:Fori=1To10a(i)=Int(100*Rnd)Printa(i);NextiPrintFori=1To9Fori=1to9是因为数组a只包含10个元素，按选择排序的要求，需要将数组前9个元素分别与后面的元素（从i+1起，直到10为止）比较大小k=ik=i的作用为把a(i)视为最小元素，记录a(i)的数组下标Forj=i+1To10Ifa(k)a(j)Thenk=jk=j的作用为当a(j)比a(k)小时，记录a(j)的数组下标，k=j记录的是每一轮选择排序过程的最小值的数组下标。EndIfNextjt=a(i):a(i)=a(k):a(k)=tNextiPrint排序以后的数:Fori=1To10Printa(i);NextIPrintEndSub,11,三、打开VB6.0，新建一个工程，在窗体中添加两个命令按钮，caption分别改为“升序排列”和“降序排列”，添加两个个标签控件。,12,在通用声明对话框对数组进行定义，使其成为窗体级变量：Dima(1To10)AsIntegerDimi,j,min,maxAsInteger首先产生10个3位整数的随机数在标签中显示。双击窗体，在Load事件中写入如下代码：,PrivateSubForm_Load()L