var i,a,min: integer;
begin
readln(i);
min:=30000;
for i:=1 to 30000 do
begin
readln(a);
if (a mod 13=0) and (a<min) then
min:=a;
end;
writeln(min)
end.
dmFyIGksYSxtaW46IGludGVnZXI7CmJlZ2luCnJlYWRsbihpKTsKbWluOj0zMDAwMDsKZm9yIGk6PTEgdG8gMzAwMDAgZG8KYmVnaW4KcmVhZGxuKGEpOwppZiAoYSBtb2QgMTM9MCkgYW5kIChhPG1pbikgdGhlbiAKbWluOj1hOyAKZW5kOwp3cml0ZWxuKG1pbikgCmVuZC4K