Data update
This commit is contained in:
parent
ed705008a8
commit
0df55f9f24
2196 changed files with 32999 additions and 3075 deletions
7
Task/Caesar-cipher/Clojure/caesar-cipher-3.clj
Normal file
7
Task/Caesar-cipher/Clojure/caesar-cipher-3.clj
Normal file
|
|
@ -0,0 +1,7 @@
|
|||
(defn fast-caesar [n s]
|
||||
(let [m (mod n 26)
|
||||
upper (map char (range 65 91))
|
||||
upper->new (zipmap upper (drop m (cycle upper)))
|
||||
lower (map char (range 97 123))
|
||||
lower->new (zipmap lower (drop m (cycle lower)))]
|
||||
(clojure.string/escape s (merge upper->new lower->new))))
|
||||
|
|
@ -33,14 +33,14 @@ class Encrypting : Enumerator
|
|||
|
||||
if (-1 < index)
|
||||
{
|
||||
^ Letters[(_key+index).mod:26]
|
||||
^ Letters[(_key+index).mod(26)]
|
||||
}
|
||||
else
|
||||
{
|
||||
index := BigLetters.indexOf(0, ch);
|
||||
if (-1 < index)
|
||||
{
|
||||
^ BigLetters[(_key+index).mod:26]
|
||||
^ BigLetters[(_key+index).mod(26)]
|
||||
}
|
||||
else
|
||||
{
|
||||
|
|
@ -63,11 +63,11 @@ public program()
|
|||
{
|
||||
console.printLine("Original text :",TestText);
|
||||
|
||||
var encryptedText := TestText.encrypt:Key;
|
||||
var encryptedText := TestText.encrypt(Key);
|
||||
|
||||
console.printLine("Encrypted text:",encryptedText);
|
||||
|
||||
var decryptedText := encryptedText.decrypt:Key;
|
||||
var decryptedText := encryptedText.decrypt(Key);
|
||||
|
||||
console.printLine("Decrypted text:",decryptedText);
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue