绝对简单易学的VB教程——冒泡法排序资料.ppt

排序问题 1、冒泡法 首先我们来看把最大的那个数放在最后位置上的方法： 假设有5个数，分别为10，2，6，7，4，存放在a(1)-a(5)中。 首先，从a(1)到a(5)，相邻的两数两两进行比较，在每次比较过程中，若前一个数比后一个数大，则交换两元素的内容。 1、冒泡法 现在重复上述算法：把a(1)到a(4)中的最大数放在a(4)中，a(1)到a(3) 中的最大数放在a(3)中，a(1)与a(2) 中的最大数放在a(2)中。这样一共经过4次选大就把a(1)到a(5)中的数进行由小到大排序。 第1轮： for j=1 to 4 if a(j)a(j+1) Then t=a(j): a(j)=a(j+1) : a(j+1)=t End if Next j 第2轮： for j=1 to 3 if a(j)a(j+1) Then t=a(j): a(j)=a(j+1) : a(j+1)=t End if Next j 第3轮： for j=1 to 2 if a(j)a(j+1) Then t=a(j): a(j)=a(j+1) : a(j+1)=t End if Next j 第4轮： for j=1 to 1 if a(j)a(j+1) Then t=a(j): a(j)=a(j+1) : a(j+1)=