Rästel zu schwer ?

Anzeige

AW: Rästel zu schwer ?

Vllt. hat Cäsar mittendrin die Rotation geändert.

 

AW: Rästel zu schwer ?

Meinst du meinen Code? Bei mir kann es höchstens sein das bei einer neuen Zeile statt mit ck mit kc weiter gemacht wird. Leerzeichen dürfen nicht beachtet werden.

Wenn nicht, an welcher Stelle soll sich die Verschlüsselung geändert haben?

Ich hätte als Hinweis übrigens nicht "Cäsar wurde auch mal 3 x 11" geschrieben, sondern eher "Vigenère wurde auch mal 2 x 10"

Wobei mir der tiefere Sinn des Satzes nicht ganz klar ist.

 

AW: Rästel zu schwer ?

Ich weiß ja nicht, aber wenn ich es durch mein Progi durch jage erhalte ich

"genau genommen handelt es sich hierbei nicht um eine caesar
kwflwzf ce mavw daowvwzw dwzkkztmmkawtmvy"

Nun habe ich aber festgestellt, in der 2 Zeile das dort jemand die 8 als eine schöne Zahl findet.

Also meinst du ich wäre off by one, damit sollte der Text so aussehen.


sdwoz
odd ldw ply wpve rm glv cdpwdhw qtfsw kx dfszpu tve
kzpl olyjp vtqo xyhygwlnk odd xylghcvfp
fqo gth xhyvnkwlnkp gfpxkple dmhc epl ohx
fqtypudxx etq tfs ptu yrnk ylnke jlqk vtfshc
odd scrmopp tve kpxeh ylnke gth lwzppqpurlp
drygpuy glv shcc ohd ppqdfshy
aklqeddlp ldw hlnkelrhc dwv hldvpq hldvpq tve
mhrupqkw aklqeddlp dmhc xxilvdw olp jlqkh hhww


Erschließt sich der Sinn nun vielleicht ein wenig mehr ?
Warum nicht Cäsar, dort geschah ja nur die Verschiebung, das gemiene an meiner Version ist das doppelt bzw unterschiedliche verschieben.

 

AW: Rästel zu schwer ?

Hi,

könnt ihr mal bitte das Rätsel auflösen! Vor allem "Cäsar wurde auch mal 3 x 11". Ich habe auch versucht hin und her zu schieben, bin aber leider auf keinen grünen Zweig gekommen.

MfG
nur_leser

 

AW: Rästel zu schwer ?

Ich sagte nicht das Cäsar ganz falsch ist. Bei Cäsar wurden halt alle Buchstaben um den selben Wert verschoben. Vigenère hat Cäsars Methode erweitert, in dem nicht nur ein Verschiebewert benutzt wird, sondern ein Schlüsselwort, mit mehr als einem Zeichen.

Also, für die dies nicht rausbekommen haben, der ursprüngliche Text kann man wie folgt übersetzen.

Wenn man sich das Alphabet anschaut:
A B C D E F G H I J K L M N O P Q R S T U V W X Y Z

r um 10 nach links => h
c um 2 nach links => a
v um 10 nach links => l
n um 2 nach links => l
y um 10 nach links => o

n um 10 nach links => d
c um 2 nach links => a
c um 10 nach links => s

k um 2 nach links => i
c um 10 nach links => s
v um 2 nach links => t
.......


Meine zweite Zeile (die erste wurde schon gelöst):
u um 2 nach links => s
y um 10 nach links => o
p um 2 nach links => n
n um 10 nach links => d
g um 2 nach links => e
b um 10 nach links => r
p um 2 nach links => n

e um 10 nach links => u
o um 2 nach links => m

okxg fkqgxgbg fgbumjvwoucgvwxi => eine vigenere verschluesselung

Komplett:
genau genommen handelt es sich hierbei nicht um eine caesar
sondern um eine vigenere verschluesselung

Polyalphabetische Substitution

 

AW: Rästel zu schwer ?

Hi,

danke erst mal für die Auflösung. Das 10 nach links schieben hatte ich auch schon in Betracht gezogen aber immer wieder verworfen da ich einfach nicht auf den Sinn von "Cäsar wurde auch mal 3 x 11" gekommen bin. Sollte der Hinweis nur für verwirrung sorgen oder was sollte damit gesagt werden ?

MfG
nur_leser

 

AW: Rästel zu schwer ?

Also das mit 3 x 11 war jeweils um eins daneben, wohl einen Denkfehler gemacht sorry.


Aber der Satz

genau genommen handelt es sich hierbei nicht um eine caesar
sondern um eine vigenere verschluesselung

muß lauten

qgxce iopyowgx jkpngvv ou ckmj rkotlgs pserv eo okxg mcoukt
cqxfotx ww gspo xsiopoto xotcernegcuonepq

nicht
qgxce iopyowgx jkpngvv ou ckmj rkotlgs pserv eo okxg mcoukt
kwflwzf ce mavw daowvwzw dwzkkztmmkawtmvy


Zumindest sagt mir das mein Progi.

Es sei denn in meinem Quellcode hätte sich ein Fehler eingeschlichen.

Code:

procedure TForm1.Btn_DecryptClick(Sender: TObject);
var
b,dd,u,y,x,a,c:integer;
text_in,t:string;
begin
   for y:=0 to form1.Memo2.Lines.Count-1 do
    begin
      t:='';
      u:=0;
      a:=10;
      c:=2;
      text_in:=lowercase(form1.Memo2.Lines[y]);
      for  x:=1 to length(text_in) do
        begin
          if text_in[x]=' ' then
            begin
              t:=t+' ';
            end;
          if text_in[x]<>' ' then
            begin
              u:=u+1;
              dd:=2*round(u/2);
              if dd=u then b:=(ord(text_in[x])-c);
              if dd<>u then b:=(ord(text_in[x])-a);
              if (b < 97) then b:=b+26;
              t:=t+chr(b);
            end;
        end;
      form1.Memo3.Lines.Add(t);
    end;
end;

 

AW: Rästel zu schwer ?

Das ganze ist ne frage wie man bei einer neuen Zeile anfängt. Bei mir startet die 2te Zeile mit der Verschiebung um 2.

Das "kwflwzf ce mavw daowvwzw dwzkkztmmkawtmvy" ist übrigens gar nicht von mir, sondern ist dein versuchte entschlüsselung.

Damit es mit deinem Programm klappt, einfach in meiner 2ten zeile ein dummy buchstaben davor setzen.

---------------------

qgxce iopyowgx jkpngvv ou ckmj rkotlgs pserv eo okxg mcoukt
xuypngbp eo okxg fkqgxgbg fgbumjvwoucgvwxi

==>

genau genommen handelt es sich hierbei nicht um eine caesar
nsondern um eine vigenere verschluesselung

 

AW: Rästel zu schwer ?

Womit man so alles seine Zeit verschwenden kann

 

AW: Rästel zu schwer ?

Ich denke es gibt sinnloseres !

Bei mir startet jede Zeile mit dem ungeraden damit mit der 10 Verschiebung die eine 11 werden sollte.