Program HelloWorld(output);
var k, n, a, amin: integer;
begin
amin:=30000;
readln(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.
UHJvZ3JhbSBIZWxsb1dvcmxkKG91dHB1dCk7CnZhciBrLCBuLCBhLCBhbWluOiBpbnRlZ2VyOwpiZWdpbgphbWluOj0zMDAwMDsKcmVhZGxuKG4pOwpmb3Igazo9MSB0byBuIGRvCmJlZ2luCnJlYWRsbihhKTsKaWYgKGEgbW9kIDEzID0gMCkgYW5kIChhPGFtaW4pIHRoZW4KYW1pbjo9YTsKZW5kOwp3cml0ZWxuKGFtaW4pOwplbmQu