Algoritmo que lea N Numeros y que muestre si son positivos,negativos o igual a cero(mientras)

Proceso nnumeros
Escribir "cuantos numeros deseas registrar";
Leer N;
X=1
Mientras X<=N Hacer
Escribir "dame numero";
Leer A;
Si A=0 Entonces
Escribir "igual a cero";
Sino
Si A>0 Entonces
Escribir "positivo";
Sino
Escribir "negativo";
FinSi
FinSi
X=X+1
FinMientras

FinProceso