pascal排序算法
这个问题我前不久做过,用冒泡排序就能解决。不信你编一个试试看。
思想是按照第一个顺序或者最后一个顺序把最小的放在最左边,不考虑途中的任何情况,然后移动下一个最小的,再移动更小的,直到倒数第二个移动到位,最后一个也移动。
因此,这种思想可以看作是冒泡排序的一种变体。
代码很简单,我就不给出了。如果你真的编起来有困难,那就来说说吧。我认为想法比代码更重要。代码能力可以通过做题来实现,但是思路必须自己去理解。
奖学金
程序a1(输入,输出);
定义变量
n,x,y,z,I,j:整数;
a:数组:= x;
a:= x+y+z;
结束;
对于i:=1到n-1,执行{选择排序}
对于j:=i+1到n do
如果(a & lta)或((a=a)和(a & lta))或((a[i,1]& gt;a[j,1])和(a=a)和(a=a))那么
开始
swap(a[i,1],a[j,1]);
互换(a,a);
互换(a,a);
结束;
for i:=1到5 do
writeln(a[i,1],' ',a);
结束。