Hi
Wenn der Encrypton Exponent E auf 3 fixiert wird dann müssen die Primzahlen P,Q kongruent 2 mod 3 sein. Der Exponent 3 ist der kleinstmögliche Exponent, hat aber auch ziemlich große Sicherheitsrisiken.
Der Decryption Exponent D sollte D = E^-1 mod LCM(P -1, Q -1) und GCD(D, P * Q) = 1.
LCM ist das größte gemeinsamme Vielfache.
Im deinem Beispiel komme ich auf D = 9417.
Delphi-Quellcode:
function LCM(A,B: Integer): Integer;
begin
if A = B then Result := Abs(A) else
if (A = 0) or (B = 0) then Result := 0
else Result := Abs(A div GCD(A, B) * B);
end;
Gruß Hagen