Thema
:
Delphi
Algorithmus umgekehrt darstellen
Einzelnen Beitrag anzeigen
DavidJNG
Registriert seit: 19. Apr 2015
13 Beiträge
#
3
AW: Algorithmus umgekehrt darstellen
29. Mai 2015, 09:26
Hab's:
markieren
Code:
summe := (ord(zeile[i]) - 32) - (ord(code[j]) - 32);
if summe < 0
then summe := summe + 94;
summe := summe + 32;
hilf := hilf + chr(summe);
Zitat
DavidJNG
Öffentliches Profil ansehen
Mehr Beiträge von DavidJNG finden