一、冒泡排序法 待排序的数据 source=6,2,8,4,0,9,3,5,1,7 排序后的数据 sort=0,1,2,3,4,5,6,7,8,9 二、选择排序法 待排序的数据：source=12,54,65,2,3,40,91,7,321,50 排序后的数据：sort=02,3,7,12,40,50,54,65,91,321 三、Shell 排序法 待排序的数据：source=23,54,8,25,61,77,13,10,66,9 排序后的数据：sort=08,9,10,13,23,25,54,64,66,77 四、快速排序法 待排序的数据：source=56,10,94,99,42,83,56,89,31,73 排序后的数据：sort=010,31,42,56,56,73,83,89,94,99 五、顺序查找法 source=6,2,8,4,0,9,3,5,1,7 input key: 0 a=0 六、折半查找法 Source=2,5,7,9,10,11,13,17,21,23 Input key: 13 a=13 观察得知，利用 fortran 语言以上几种排序法均可完成数据的排序，五六的查找法也可找到 数据在数组中的位置。 1、冒泡法 j=1 j0 mina(j) temp=a(j) a(j)=a(i) a(i)=temp min=a(i) i+ 结束 否 否 是 是 是 否 开始 i=1,n=10 i=n j- 3、shell 排序 i=k+1 j=0,a(i)=temp i+ 结束 否 否 是 是 否 开始 n=10，k=n/2 k0 j- a(j+1)=temp in+1 j=i-1 temp=a(i) a(j+1)=a(j) k=k/2 是 4、 （流程图不会画） 5、顺序查找 i=1 in=1 Key=a(j) return i “a(i)=key” “not found” 否 否 是 开始 Input key i+ 6、折半查找 Binary_search=0 la(m) l=m+1 m=(l+r)/2 r=m-1 m=(l+r)/2 结束 否 否 是 是 是 否 开始 Input key Keya(m)