使用编程: 已知数列1,-4,35,0,5,8,-9,6存储在数组a中,用选择法将该数列从大到小排序

如题所述

var
a,b:array [1..8] of integer;
i,j,max:integer;
begin
for i:=1 to 8 do begin
max:=1;
for j:=2 to 9-i do if a[max]<a[j] then max:=j;
b[i]:=a[max];
a[max]:=a[9-i];
end;
for i:=1 to 8 do writeln(b[i]);
end.
温馨提示:答案为网友推荐,仅供参考