RosettaCodeData/Task/Chaocipher/Zkl/chaocipher-2.zkl

10 lines
370 B
Plaintext

plainText:="WELLDONEISBETTERTHANWELLSAID";
println("The original plaintext is : ",plainText);
println("\nThe left and right alphabets after each permutation"
" during encryption are:");
cipherText:=Chao.encode(plainText);
println("\nThe ciphertext is : ",cipherText);
plainText2:=Chao.decode(cipherText);
println("\nThe recovered plaintext is : ",plainText2);