Teşekkür ederim hocam dediğiniz gibi yapılabilir ama diziyi kontrol etmem gerekiyormuş
for(i=0;i<N;i++)
{
if(A[i]>0) {y++; Poz[y-1]=A[i];}
if(A[i]<0) {x++; Neg[x-1]=A[i];}
}aynen böyle ama A[i]'yi değil Poz olacakmış öyle yapınca da doğru düzgün çalıştıramadım.
bunu tamamlayıp pozitifleri aldıktan sonra yukarıdaki kodda belirttiğim gibi pozitif dizisini kullanarak tek çift ayrımını yaptırıp yeni dizilere ekleyebilirsiniz.