Ayuda con algoritmo en PSeInt

hola, necesito un poco de ayuda con el sgte algoritmo por favor:

cree un arreglo de N posiciones con números al azar.
si el primer numero que se genera es par el sgte debe ser impar y así sucesivamente, y lo mismo si el primer numero es impar el sgte debe ser par.

esto es lo que llevo hasta el momento:

Spoiler

Proceso sin_titulo
Definir A Como Entero;
Definir n,i Como Entero;
Definir contadorP,contadorI como entero;
contadorP<-0;
contadorI<-0;
Escribir "Ingrese el largo del arreglo:";
Leer n;
Dimension A(n);
i<-1;


Para i<-0 hasta n-1 hacer
A(i)<-azar(100)+1;
Escribir "Posicion ",i,"=",A(i);
FinPara


Para i<-0 hasta n-1 hacer
Si A(i)%2=0 entonces
contadorP<-contadorP+1;
Sino
contadorI<-contadorI+1;
FinSi
FinPara
FinProceso

lo que no puedo hacer es ordenarlos como dice el ejercicio.
si alguien sabe como lo puedo hacer que me ayude por favor
gracias.