FIBONACCI.c

/* SE MUESTRA LA SUCESION DE FIBONACCI
	1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89, 144, ....
	HASTA LA POSICION N
*/

#define DIM 50

main ()
{
	int N = 0;
	int Vector[DIM];

	Pregunta(&N);
	printf("N= %d\n", N);
	Inicializa(Vector);
	Genera(N, Vector);
	Imprime(Vector, N);
	printf("\nFin de la sucesion...");
}

Imprime(int V[], int N)
{
	int x = 0;
	for (x = 0; x < N; x++)	printf("%d,\t", V[x]);
}


Inicializa(int V[])
{
	int x = 0;
	for (x = 0; x < DIM; x++) V[x] = 0;
}

Pregunta(int *N)
{
	int x = 0;
	printf("\nHasta que numero de la sucesion?: ");
	scanf("%d",&x);
	*N = x;
}

Genera(int N, int V[])
{
	int x = 0;
	for (x = 0; x < N; x++)
		if (x == 1 || x == 0)  V[x] = 1; else V[x]= V[x-1] + V[x-2];
}