#include<stdio.h>
#include<stdlib.h>
char a[20010],b[20010];
int n=0,c[20010],m=0,num1,num2,max=0;
bool hw(int x,int y){
int i,j;
for(i=x;i<=y;i++)
if(b[i]!=b[y-i+x])
return false;
return true;
}
int main(){
int i,j,k;
freopen("calfflac.in","r",stdin);
freopen("calfflac.out","w",stdout);
while(scanf("%c",a[++n])!=EOF){
if(a[n]>='A' && a[n]<='Z'){
b[++m]=(char)((int)a[n]-'A'+'a');
c[m]=n;
}
else if(a[n]>='a' && a[n]<='z'){
b[++m]=a[n];
c[m]=n;
}
}
for(i=1;i<=m;i++)
for(j=i;j<=i+2000 && j<=m;j++)
if(hw(i,j) && j-i+1>max){
max=j-i+1;
num1=c[i];
num2=c[j];
}
for(i=num1;i<=num2;i++)
printf("%c",a[i]);
puts("");
return 0;
}