var s:ansistring; i,j,n:longint; begin readln(n); for i:=1 to n do begin readln(s); for j:=length(s) downto 1 do write(s[j]);writeln; end; end. /************************************************************** Problem: 2209 User: admin Language: Pascal Result: Wrong Answer ****************************************************************/