Einzelnen Beitrag anzeigen

blink182

Registriert seit: 19. Jun 2007
126 Beiträge
 
Delphi 5 Standard
 
#3

Re: Integer zu Float umwandeln

  Alt 16. Mär 2009, 19:54
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
  Mit Zitat antworten Zitat