Delphi-Quellcode:
function fraction(t: double) : double;
const
HWZ : double = 12;
begin
Result := Math.power(0.5, t/HWZ);
end;
Gibt dir den Bruchteil zurück, der nach der Zeit t übrigbleibt
d.h. du musst den Bruchteil noch mit der Ursprungsmenge multiplizieren, um die Momentanmenge zu erhalten