使用选择排序方法将用户输入的任意n个整数按从大到小的顺序排序并输出 编程题

假定数据放在a数组内(全局变量),已有n个整数,调用以下过程就可以排好序了.至于输入和输出,我想应该可以了吧?

procedureselect;

vari,k,x:integer;

begin

fori:=1ton-1do

begin

k:=i;

forj:=i+1tondo

ifa[j]>a[k]thenk:=j;

x:=a[i];a[i]:=a[k];a[k]:=x;

end;

end;