So gehts, auch wenn man bei großen Werten (>100) Gleitkommafehler bekommt...
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
const e = 2.718281828;
var Wert : Real;
delta,masse,t : real;
begin
delta := 10;
masse := 10;
t := 5;
Wert := Power(1-e,-(delta/masse)*t);
showmessage( floattostr(Wert));
end;