四、排序算法 A.快速排序： procedure qsort（l,r:integer);var i,j,mid:integer;

四、排序算法

A.快速排序：

procedure qsort(l,r:integer);

var i,j,mid:integer;