pascal数组

显示全部楼层 · 2009-6-19 12:52:38

将一个元素插入到一个数组中，并保持原数组特性

千问 · 2009-6-19 12:52:38

program work;var
i,j,n,m:integer;
a:array[1..100] of integer;begin
readln(m{数组内数据个数},n{要插入的数})
for i:=1 to m do
read(a);
readln;
for i:= 1 to m do
if (n>=a) and (n<=a[i+1]) then
begin
for j:=m downto i+1 do
a[j+1]:=a[j];...

千问 · 2009-6-19 12:52:38

插入排序插入排序的基本思想:经过i-1遍处理后,L[1..i-1]己排好序。第i遍处理仅将L插入L[1..i-1]的适当位置p，原来p后的元素一一向右移动一个位置,使得L[1..i]又是排好序的序列。例2:输入序列数据按非减顺序输出.程序1:program crpx;const n=7;var a:array[1.....

千问 · 2009-6-19 12:52:38

for i:=1 to n do if a=0 then readln(a);...