danke erstmal
hab jetzt so gemacht :
Delphi-Quellcode:
function Power(Basis,Exponent:Extended):extended;
begin
result := exp(Exponent*ln(Basis))
end;
function verschluesseln(m:integer):integer;
begin
n:=q*s;
result:=Power(m,e) mod n;
end;
nur das problem ist jetzt das ich mit Power(m,e) ja einen extended Wert habe. ich schätz es wird jetzt schwierig diesen wert in einen integer umzuwandeln, denn bei der rsa verschlüsselung sind werte die bei power(m,e) eingesetzt werden schon mal zahlen wie power(133,151). weiß jemand wie ich das problem lösen kann ?