B.插入排序： 思路：当前a[1]..a[i－1]已排好序了 现要插入a[i]使a[1]..a[i]有序。procedure inser
思路
已帮助 人
B.插入排序：
思路：当前a[1]..a[i-1]已排好序了，现要插入a[i]使a[1]..a[i]有序。
procedure insert_sort;
var i,j:integer;
-
正确答案：
begin
for i:=2 to n do begin
a[0]:=a[i];
j:=i-1;
while a[0]<a[j] do begin
a[j+1]:=a[j];
j:=j-1;
end;
a[j+1]:=a[0];
end;
end;{inset_sort}