Menghitung Eksponen dari 2 dan Log di delphi

source code untuk Menghitung Eksponen dari 2 dan logaritma:

unit Unit1;

interface

uses

Forms, Dialogs;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation

procedure TForm1.FormCreate(Sender: TObject);
var
  float : Double;
begin

float := Ln(2);

ShowMessage('Ln(2) = '+FloatToStr(float));

float := Exp(float);

ShowMessage('Exp(Ln(2)) = '+FloatToStr(float));
end;
end. 

Note:

Ln (2) = ,693147180559945
Exp (Ln (2)) = 2