var s:string;begin repeat readln(s);writeln(s[length(s)]+copy(s,2):length(s)-1,s:1)until 1=0end.