Задание

Требуется выделить все отрицательные элементы массива A[1..N] в начало массива B[1..N]. Какой оператор надо вставить в программу вместо многоточия?

c:=1;

for k:=1 to N do

if A[k]<0 then begin

...

c:=c+1

end;