import Data.List\x0d t x=[[" ","","abc","def","ghi","jkl","mno","pqrs","tuv","wxyz"]!!read[g!!0]!!(length g-1)|g<-group x,g/="1"]\x0d main=putStrLn.t=<<getLine
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page