Вставьте число k перед всеми отрицательными элементами. Паскаль

Пусть k - это номер элемента, после которого мы должны вставить элемент х. Тогда вставка осуществляется следующим образом:

первые k элементов массива остаются без изменения,

все элементы, начиная с (k+1)-го, необходимо сдвинуть на один назад,

на место (k+1)-го элемента записываем значение х;

увеличить количество элементов в массиве на единицу.

Объяснение:

var

  n,i,a: integer;

begin

  readln(n);

  for i: =1 to n do

  begin

  read(a);

  write(abs(a),' ');

end;

end.

253(8)=10101011(2)

2в4(16)=1010110100(2)

48(16)=1001000(2)