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

begin
  ans := 0;
  for i := 1 to 10 do
    read(a[i]);
  for i := 1 to 10 do
    if (a[i] < 3) then ans := ans + a[i];
  writeln(ans);
end.