var n, i, a, max: integer;
begin
readln(n);
max := -1;
for i := 1 to n do
begin
readln(a);
if (a mod 5 = 0) and (a > max)
then max := a;
end;
writeln(max)
end.
dmFyIG4sIGksIGEsIG1heDogaW50ZWdlcjsKYmVnaW4KICAgIHJlYWRsbihuKTsKICAgIG1heCA6PSAtMTsKICAgIGZvciBpIDo9IDEgdG8gbiBkbwogICAgICAgIGJlZ2luCiAgICAgICAgICAgIHJlYWRsbihhKTsKICAgICAgICAgICAgICBpZiAoYSBtb2QgNSA9IDApIGFuZCAoYSA+IG1heCkKICAgICAgICAgICAgICAgIHRoZW4gbWF4IDo9IGE7CiAgICAgICAgZW5kOwogICAgd3JpdGVsbihtYXgpCmVuZC4=