clc;
a=input('give array')
%a=[-2,3,10,-12];
j_gadol=1;
j_katan=1;
x_gadol=1;
x_katan=1;
n=length(a)
for i=1:n
    if a(i)>0
      x_gadol(j_gadol)=a(i);
      j_gadol=j_gadol+1;
  else
      x_katan(j_katan)=a(i);
      j_katan=j_katan+1;
    end
end

j_gadol=j_gadol-1;
j_katan=j_katan-1;

x_gadol
x_katan
j_katan
j_gadol