var i,j,n:word;begin
repeat
inc(i);n:=0;for j:=0to 2do n:=n+ord(i div(10pow j)mod 10in[3,6,9]);if
n=0then write(i);writeln("ClapClapClap":4*n)until i>999end.