var a,s: integer;
i: byte;
begin
for i:=1 to 70 do begin
readln(a);
if a < 100 then s:=s + a;
end;
writeln(s);
end.
