%Este programa calcula la sucesión de los 
% números de FIBONACCI.
next=0;
latest=1;
sum=0;
n=1;
nf= input('Dame el número hasta el que deseas la sucesión de Fibonacci:');

fprintf('La sucesión de Fibonacci hasta')
fprintf('el 1er. número mayor que el %i es:\n',nf);
   while (sum<=nf) 
      sum=latest+next;
      fprintf('           %12.5f.\n',sum)
      next=latest;
      latest=sum;
      n=n+1;
   end 
fprintf('El primer número de Fibonacci')
fprintf(' mayor que el dado es %12.5f.\n',sum)

