快速排序

Posted 2020-08-15 KYRIE`RUSSAL

 

快速排序=挖坑填数+分治法

【举例】

66 13 51 76 81 26 57 69 23
23 13 51 57 26 66 81 69 76

 

【Pascal版】

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

procedure Qsort(l,r:longint); var i,j,t:longint; begin     i:=l;j:=r;t:=a[i];   //在i处挖坑     while i<j do     begin         while (i<j)and(a[j]>=t) do dec(j);         if(i<j) then begin a[i]:=a[j]; inc(i); end;  //挖j填i         while (i<j)and(a[i]<=t) do inc(i);         if(i<j) then begin a[j]:=a[i]; dec(j); end;  //挖i填j     end;     a[i]:=t;    //填i     if l<i-1 then Qsort(l,i-1);     if r<j+1 then Qsort(i+1,r); end;

　　

【C++版】

 

1 2 3 4 5 6 7 8 9 10 11 12

void Qsort(int L,int R){     int i=L,j=R,t=a[i];    //在i处挖坑     while(i<j){         while(i<j && a[j]>=t)j--;         if(i<j){a[i]=a[j]; i++; }  //挖j填i         while(i<j && a[i]<=t)i++;         if(i<j){a[j]=a[i]; j--; }  //挖i填j     }     a[i]=t;  //填i     if(l<i-1) Qsort(l,i-1);     if(r<j+1) Qsort(i+1,r); }