natürlicher logaritmus von x

[MasterTobi]

ich danke euch

hab´s jetzt rausgefunden "juhu"

Delphi-Quellcode:

procedure TForm2.Button7Click(Sender: TObject);
var a,x:extended;
b,c:string;
begin
c:=edit1.text;
x:=strtofloat(c);
a:=Ln(x) / Ln(2);
b:=floattostr(a);
edit6.text:=b;