var
  i, a: integer;
  arr: array [1..10] of integer;

begin
  for i := 1 to 10 do
    read(arr[i]);
  for i := 1 to 10 do
  begin
    if arr[i] mod 6 = 0 then
      a += arr[i];
  end;
  Write(a/10);
end.