var n, i, a, sum: integer; begin readln(n); sum:=0; for i := 1 to n do begin readln(a); if (a <= 16) and (a mod 10 <> 5) then sum:= sum+a; end; writeln(sum) end.