快速排序

题目描述

利用快速排序算法将读入的N个数从小到大排序后输出。

快速排序是信息学竞赛的必备算法之一。对于快速排序不是很了解的同学可以自行上网查询相关资料，掌握后独立完成。（C++选手请不要试图使用STL，虽然你可以使用sort一遍过，但是你并没有掌握快速排序算法的精髓。）

输入输出格式

输入格式：

输入文件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

说明

这只是一个十分简单的排序，只要用快排就行了！

程序如下：

const
maxn=100000;
var
a:array[1..maxn] of longint;
i,n:longint;

procedure qsort(l,r:longint);
var
i,j,key,temp:longint;
begin
if l>=r then exit;
i:=l;
j:=r;
key:=a[l+random(r-l+1)];
repeat
while  (a[i]<key) do inc(i);
while  (a[j]>key) do dec(j);
if i<=j then
begin
temp:=a[i];
a[i]:=a[j];
a[j]:=temp;
inc(i);dec(j);
end;
until i>j;
qsort(l,j);
qsort(i,r);
end;

begin
readln(n);
for i:=1 to n do read(a[i]);
randomize;
qsort(1,n);
for i:=1 to n do write(a[i],' ');
end.