Einzelnen Beitrag anzeigen

Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.768 Beiträge
 
Delphi 10.4 Sydney
 
#2

AW: (Delphi) Polybios-Chiffre entschlüsseln

  Alt 4. Mär 2012, 19:14
Hallo,

PolyBios benutzt doch eine Matrix (5x5; Array[1..5,1..5] bzw. Array[0..4,0..4]) um aus dem Geheimtext wieder den Klartext zur erhalten, musst Du nur die Spalte und Zeile der Matrix aufsuchen.

Klartext H
GeheimText 23
Position in der Matrix:Spalte 3 und Zeile 2

Spalte := Geimtext(Zahl) mod 10;
Zeile := Geimtext(Zahl) div 10;

Grüße
Klaus
Klaus

Geändert von Klaus01 ( 5. Mär 2012 um 10:58 Uhr)
  Mit Zitat antworten Zitat