http://www.deqnotes.net/acmicpc/p0003/ja (via hattanさんとzyxwvさん) みんなやってて楽しそうだったからやりました。Parsecでやっつ系。 import Text.ParserCombinators.Parsec as Parsec key = [cycle ['.',',','!','?',' '], cycle ['a','b','c'], cyc…