Außer "hoch_mod" sehe ich da nichts weiter. Ich kann mir nicht vorstellen, dass das schon alles sein soll (ich habe auch keinen Plan von RSA, aber AFAIK arbeitet der mit Schlüsselpaaren, das muss also definitiv entschieden mehr Code sein).
Da der Schlüssel anscheinend gegeben ist, sollte diese Funktion tatsächlich
ausreichen.
Delphi-Quellcode:
const p = 11;
const q = 13;
const e = 23;
const d = 47;
Delphi-Quellcode:
function RSAWerkzeug.verschluesselCode: Integer;
begin
zVerschluesselterCode := hoch_mod({Hier die richtigen Parameter einsetzten.});
end;
function RSAWerkzeug.entschluesselCode: Integer;
begin
zEingabeCode := hoch_mod({Hier die richtigen Parameter einsetzten.});
end;
Für die Textverschlüsselung würde ich es versuchen den Text buchstabenweise zu ent-/verschlüsseln (bei dem gegebenen Schlüssel geht das aber nur für Ansii-Zeichen).
Aber wenn dieser Quelltext eine Vorgabe ist