uses
    SysUtils,
    Crt;

type
    int = longint;
    bool = boolean;
    
const
    fi = 'INPUT.INP';
    fo = 'OUTPUT.OUT';

var
    st: array[0..1005] of string;
    mr: array[0..1005] of int;
    i, n: int; 

function check(s: string): bool;
var 
    i, cnt: int;
begin
    cnt:=0;
    for i:=1 to n do
        if (st[i] = s) then begin
            inc(cnt);
            mr[i]:=1;
        end;
    exit(cnt <= 1);
end;
    
begin
    assign(input, fi); reset(input);
    assign(output, fo); rewrite(output);

    readln(n);
    for i:=1 to n do readln(st[i]);
    for i:=1 to n do
        if mr[i] = 0 then begin
            if check(st[i]) then begin
                write(st[i]);
                break;
            end;
        end;
        
    close(input); close(output);
end.

uses crt;

var S : array [1 .. 1000] of string;

    X : string; i, n, k : integer;

    f1, f2 : text;

function KT(X : string) : byte;

begin

    KT := 0; k := 1;

    while (KT <= 1) and (k <= n) do

        begin

            if X = S[k] then KT := KT + 1;

            k := k + 1;

        end;

end;

begin

clrscr;

assign(f1, 'INPUT.INP'); reset(f1);

assign(f2, 'OUTPUT.OUT'); rewrite(f2);

readln(f1, n);

for i := 1 to n do readln(f1, S[i]);

for i := 1 to n do

    begin

        X := S[i]; 

        if KT(X) = 1 then break;

    end;

write(f2, X);

close(f1); close(f2);

readln

end.