var
a,s:integer;
begin
s:=0;
a:=1;
until a<>0 do
read(a);
s:=s+a;
end;
write(s);
end.
s = 0
i = 1
while i != 0:
i = int(input())
s += i
print(s)
