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