а метод сортировки в поисковике -сортировка массива методом вставки Паскаль
program massiv;
uses crt;
var
i,n:integer;
b:array[1..100] of integer;
BEGIN
randomize;
clrscr;
writeln;
write('Vvesti N: '
;
readln
;
writeln('Vektor B: '
;
for i:=1 to n do begin
b
:=random(101)-50; write(b:3);
end;
writeln;
end.