RSA verschlüsselung funktioniert nicht...

[gammatester]

Das ist selbst im Ansatz kein RSA:

Delphi-Quellcode:

      // 2 Durch formel ( C = M^e mod N ) verschlüsseln
      acode := (acode + round(exp(7*ln(5))) mod 187);

Hier wird ja "nur" ein fester Wert drauf addiert im Gegensatz zur Formel. Wenn Du diese andere Art Verschlüsselung akzeptierst, ist die Entschlüsselung natürlich

       acode := (acode - round(exp(7*ln(5))) mod 187); .

Aber implementiere mal nach den Formel, benutzte Integerarithmetik und suche nach "Schnelle Modulare Exponentation" (im wesentlich ausmultiplizieren und nach jedem Schritt mod ausführen).


Gruß Gammatester