Vector con números naturales

Programa en Pseudocódigo para cargar un vector de dimension N con elementos naturales del 1 a N  y mostrarlo por pantalla.

Proceso vector
Dimension a[1000]
Repetir
leer n
Hasta Que n>1 & n = trunc(n)
Para i<-1 Hasta n Con Paso 1 Hacer
a[i]<-i
FinPara
Para i<-1 Hasta n Con Paso 1 Hacer
Escribir a[i]
FinPara
FinProceso