var a,b:string;i:word;begin readln(a);case length(a)of 10:b:=a;77:for i:=1to 120do b:=b+':';18:for i:=1to 27do b:=b+"x"end;write(b)end.