Program HelloWorld(output);
var k, n, a, amin: integer;
begin
amin:=30000;
read(n);
for k:=1 to n do
begin
readln(a);
if (a mod 13 = 0) and (a<amin) then
amin:=a;
end;
writeln(amin);
end.
UHJvZ3JhbSBIZWxsb1dvcmxkKG91dHB1dCk7CnZhciBrLCBuLCBhLCBhbWluOiBpbnRlZ2VyOwpiZWdpbgphbWluOj0zMDAwMDsKcmVhZChuKTsKZm9yIGs6PTEgdG8gbiBkbwpiZWdpbgpyZWFkbG4oYSk7CmlmIChhIG1vZCAxMyA9IDApIGFuZCAoYTxhbWluKSB0aGVuCmFtaW46PWE7CmVuZDsKd3JpdGVsbihhbWluKTsKZW5kLg==