[洛谷1177]快速排序

题目来源

www.luogu.org

原网页

http://www.luogu.org/problem/show?pid=1177#

题目描述

利用快速排序算法将读入的N个数从小到大排序后输出。
快速排序是信息学竞赛的必备算法之一。对于快速排序不是很了解的同学可以自行上网查询相关资料，掌握后独立完成。（C++选手请不要试图使用STL）

输入输出格式

输入格式：

输入文件sort.in的第1行为一个正整数N，第2行包含N个空格隔开的正整数a[i]，为你需要进行排序的数，数据保证了A[i]不超过1000000000。

输出格式：

输出文件sort.out将给定的N个数从小到大输出，数之间空格隔开，行末换行且无空格。

输入输出样例

输入样例#1：

5
4 2 4 5 1

输出样例#1：

1 2 4 4 5

说明

对于20%的数据，有N≤1000；
对于100%的数据，有N≤100000。

题解

这题也就不多说了吧。

代码

var

  n,i:longint;

  a:array[1..1000000] of longint;

procedure nn(l,r:longint);

  var

    i,j,m,t:longint;

  begin

    i:=l;j:=r;

    m:=a[(i+j) div 2];

    repeat

      while a[i]

      while a[j]>m do dec(j);

      if i<=j then

      begin

        t:=a[i];a[i]:=a[j];a[j]:=t;

        inc(i);

        dec(j);

      end;

    until i>j;

    if i

    if j>l then nn(l,j);

  end;

begin

  readln(n);

  for i:=1 to n do read(a[i]);

  nn(1,n);

  for i:=1 to n-1 do write(a[i],' ');writeln(a[n]);

end.