Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: Fibonacci, eine 7. Variante

    Delphi
    by dizzy, 15. Aug 2007
  Ich hatte hinter dieser Version schon leise eine geniale Zerlegung der Potenzierung vermutet. Das wäre auch der Punkt an dem ich intuitiv als erstes angesetzt hätte, wenn es drum ginge es noch weiter zu verfeinern. Danke dir für die Erläuterungen! Für solche mathematische Kniffe bin ich doch immer zu haben :)
• Forum: Sonstige Fragen zu Delphi

  Fibonacci, eine 7. Variante

    Delphi
    by dizzy, 14. Aug 2007
  Zum Artikel Fibonacci in 6 Versionen ließe sich noch die folgende formelbasierte Version hinzufügen:
  
  function Fib(k: Integer): Int64;
  const
  sqt5inv = 0.447213595499957; // 1/sqrt(5)
  phi = 1.618033988749895;
  nphiinv = -0.618033988749895;
  begin
  result := Round(sqt5inv * (IntPower(phi, k)-IntPower(nphiinv, k)));
  end;