gesamt/codeb_skinner33_05.0

   1 method fib()
   2   var n:=0;
   3   var a:=0;
   4   var b:=1;
   5   while n<this do
   6     n:=n--1;
   7         b:=b-(0-a);
   8     a:=b-a;
   9   end;
  10   return a;
  11 end;