343 mod 66.25 => in delphi realisieren

[marabu]

Guten Morgen.

Den Teiler 0 solltest du extern abfangen:

Delphi-Quellcode:

function Remainder(dividend, divider: Extended): Extended;
begin
  Result := Frac(dividend / divider) * divider;
end;

Grüße vom marabu