C.选择排序:procedure sort;va

14 查阅
C.选择排序:procedure sort;var i,j,k:integer;

参考答案:

正确答案:

\r\n

begin
for i:=1 to n-1 do
for j:=i+1 to n do
if a[i]>a[j] then swap(a[i],a[j]);
end;