如何实现随机输出10个数并按从小到大的顺序排序
完整源代码,能在Delphi7下运行.
用两个Edit控件,一个显示随机数,一个输出排序结果.

　　var
i,j,temp:integer;
begin
for i:=1 to 10 do
for j:=i+1 to 10 do

if a<=a[j] then
begin
temp:=a;
a:=a[j];
a[j]:=temp
end;
for i:=1 to 10 do
listbox1.Items.add(inttostr(a))
end;