作业帮 > 综合 > 作业

pascal数组中插入元素

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/07/05 07:20:17
pascal数组中插入元素
Description
对于一个有序的一列数(从小到大排列),在其中插入一个元素,插入后仍然有序.
Input
第一行,一个数n,表示这列数的个数;
第二行,n个数;
第三行,待插入的数x
Output
n+1个数
Sample Input
5
12 33 78 99 120
30
Sample Output
12 30 33 78 99 120
Hint
n
var
n,i,m,l,k:longint;
a:array[0..1005]of longint;
begin
readln(n);
for i:=1 to n do
read(a[i]);
readln(m);
for i:=1 to n do
if m