Program Mendo;
{perdor sysutils per comparetext}
Uses sysutils;

Var
n,i,j,sporedi:integer;
ime:array of string;

fund:string;


Begin
{input broj na iminja}
readln(n);
{input iminja}
for i:=1 to n do
begin
readln(ime[i]); {ime[i] = ime na meckata vo dadenata niza }
end;
{lexo sa her osht shkru nji emer}
for i:1 to n do
begin
for j:1 to n do
begin
sporedi:=CompareText(ime[i],ime[j]);
if sporedi=0 then
begin
{kod per me numru sa her osht shkru nji emer}
end;
end;
end;
{shkruje at emer nfund che del}
writeln(fund);
end.