var
  a : array [1..100] of longint;
  n,sum,i : longint;
begin
  for i:=1 to 7 do
    readln(a[i]);
  sum:=0;
  for i:=1 to 7 do
    sum:=sum+a[i];
  writeln(sum);
end.