Mega Code Archive

 

Categories / Delphi / Algorithm Math

 

Calculate the logarithm for a variable base

Title: calculate the logarithm for a variable base? (* --- English ------ A logarithm function with a variable basis --- Deutsch ------ In Delphi ist die Funktion LN() bekannt, die den natürlichen Logarithmus einer Zahl zurückgibt. Der natürliche Logarithmus hat die Basis e^1. Um den Logarithmus zur varaiblen Basis zu berechnen hilft folgende Funktion. *) function Log(x, b: Real): Real; begin Result := ln(x) / ln(b); end; procedure TForm1.Button1Click(Sender: TObject); begin ShowMessage(Format('%f', [Log(10, 10)])); end;