Помогите пожалуйста!!!

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

c:=1;
for k:=1 to N do
if A[k]<0 then begin
…
c:=c+1
end; — Правильный ответ на вопрос найдете ниже