Integer zu Float umwandeln

[brushmate]

habs jetzt so gemacht:

Delphi-Quellcode:

function TForm1.modulo(m, n: Extended): Extended;
begin
  while m >= n do begin
    m := m - n;
    result := m;
  end; 
end;

function TForm1.crypt(K: Integer): Extended;
var help: Extended;
begin
  help := N;
  crypt := modulo(power(K, e), N);
end ;

danke für eure hilfe, scheint bis hier zu laufen