「スター暗号文64」を解いてみた - blechmusikのブログはじめに yuzuemonさんが何かのテストらしきものに取り組んでおられ、つぎのようにおっしゃっている。 スター暗号文64 - ゆず日記 初暗号挑戦で力技過ぎた感があるのですが、結局法則はあったのでしょうか もし解いた人で法則を見つけた人がいたら教えて下さい 取り上げられている課題を私も実際に解いてみたところ、一定の規則性を見つけることができた。結論を先に書こう。その規則性というか処理手順はcommon lispでは以下のように表すことができる。 (lambda (index rhs) (mod (funcall (if (evenp rhs) #'- #'+) index rhs) 26)) 以下、この処理を探し出すまでに行ったことを振り返ってみよう。 テストケースの用意 まず、「暗号文 : 解読結果」をもとに暗号文と復号結果のペアを登録しておく。 (defparameter *test
