main=mapM putStrLn[last$show n:["aho"|'3'<-show$10*n+gcd 3n]|n<-[1..300]]