f x|x`mod`3<1||'3'`elem`show x=putStr"aho\n"|0<1=print x main=mapM f[1..300]