function[f]=fibonacci(n)
%---------------------------------------------------------------------
% fkt01.m
% H. Knoll
% 27.8.2001
%
% Beispiel für eine eigene Funktion
% Fibonacci-Folge
% Wird die Summe der beiden vorhergehenden Glieder gebildet, entsteht 
% die Fibonacci-Folge. Als Startglieder werden die Zahlen 0 und 1
% festgelegt.
%----------------------------------------------------------------------

f(1)=0;
f(2)=1;

k=3;
f(k)=f(k-1)+f(k-2);
while f(k)<n
   k=k+1;
   f(k)=f(k-1)+f(k-2);
end