Integer zu Float umwandeln

[blink182]

Zitat von jaenicke:

Delphi-Quellcode:

function TForm1.Crypt(K: Integer): Extended;
begin
  Result := Power(K, e) / N;
end ;

mhm das ist ja nicht gerade der Sinn von Mod^^ und den braucht man ja bei RSA

also was nicht schön ist aber Round oder Trunc (Abrunden) funktionieren,

aber ggf. kannst du dir ja auch eine "mod"-funktion selber schreiben, die mit extended funktioniert

r:=a mod b

Delphi-Quellcode:

while a>=b do 
a:=a-b;
r:=a;

bzw

Delphi-Quellcode:

asm 
mov ax,a
@anfang_schleife: cmp ax,b
jl @ausgabe
sub ax,b
jmp @anfang_schleife
@ausgabe: mov c,ax
end;

MfG blink182