import Data.Char
import Data.List

main = interact $ unlines . show' . itp1_8_c
 where show' = zipWith (++) [[a]++" : " | a<-['a'..'z']] . map show

itp1_8_c = map ((subtract 1) . length) . group . sort . (++ ['a'..'z']) . map toLower . filter isAlpha