Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  AW: (Delphi) Polybios-Chiffre entschlüsseln

   
    by Klaus01, 6. Mär 2012
  Nun, hier ging es vorrangig um die Implementierung des Algorithmus.
  Es ist klar, dass die Verschlüsselung mit dem Key steht und fällt.
  Aber es bleibt auch immer eine monoalphatische Verschlüsselung welche relativ leicht
  zu brechen ist (Buchstabenverteilung/häufigkeit) wenn ein hinreichend langer Ciphertext
  zur Verfügung steht. Dazu ist es egal wie gut die Buchstaben im Key verwürfelt sind....
• Forum: Sonstige Fragen zu Delphi

  AW: (Delphi) Polybios-Chiffre entschlüsseln

   
    by Klaus01, 5. Mär 2012
  Anwendung:
  
  polybios in die uses mit aufnehmen.
  
  
  // encode Button
  procedure TForm1.Button1Click(Sender: TObject);
  var
  polybios: TPolybios;
  begin
• Forum: Sonstige Fragen zu Delphi

  AW: (Delphi) Polybios-Chiffre entschlüsseln

   
    by Klaus01, 4. Mär 2012
  Hallo,
  
  PolyBios benutzt doch eine Matrix (5x5; Array bzw. Array) 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;