var i:word;begin
for i:=1to 300do if 3in[i mod 3+3,i mod 10,i div 10mod 10]then write("aho
")else writeln(i)end.