var s,t:string;i:comp;begin
read(s);i:=length(s);repeat
t:=s[i]+t+s[i];writeln(t);dec(i)until 1=0end.