Sucesión de Fibonacci

Hacer un programa que muestre los primeros n de la serie de fibonacci

____________________________________________________


Proceso Sucesion_Fibonacci
x<-0;
i<-1;
n<-0;
Escribir "Ingrese la cantidad de numeros que quiere ver de la serie de Fibonacci";
Leer n;
Para cont<-1 Hasta n Con Paso 1 Hacer
r<-x+i;
Escribir x;
x<-i;
i<-r;
r<-x+i;
FinPara
FinProceso