program abeceda;
var n, i : integer;
    r : array[1..100] of string[10];

begin
    readln(n);
    for i := 1 to n do
        readln(r[i]);
    writeln('?');
end.