да , в вики он дан как просто шифр со сдвигом , но надо еще ключ замостить , к примеру , "yes" и тогда получиться такое соответствие
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
w x z y e s a b с d f g h i j k l m n o p q r t u v
в твоей проге мы в коде указываем текст котрый потом зашифруеться , но нужно его вводить вручную, я как бы указал это , изменив код , но в итоге происходит только сдвиг букв
Edit1.Text := Caesar(edit4.text, 3, 'abcdefghijklmnopqrstuvwxyz', true);
Edit3.Text := Caesar(Edit1.Text, 3, 'abcdefghijklmnopqrstuvwxyz', false);
|