program palindrome; 
var i,m,n : Integer; 
s : string[100]; 
p: boolean; 
Begin 
readln(n); 
readln(s); 
m:=n div 2; 
p:=true;
i:=1; 
while(p and (i<=m)) do 
begin 
if(s[i]=s[n-i+1]) 
then p:=true 
else 
p:=false; 
i:=i+1; 
end; 
if(p=true) then 
writeln('é palindrome') 
else 
writeln('não é palindrome'); 
End.