$_=<>;chop;
for$i(0..99){
	$a=$_.reverse substr$_,0,$i;
	last if $a eq reverse$a;
}
print$a;