var n:longint;



 procedure citire;
 var i,s,a,b,c:longint;
 begin

  readln(n); s:=0;

  if n=2 then begin
        readln(a,b);
        s:=s+b;
        readln(a,b);
        s:=s+b;
        end
  else
  if n=1 then begin readln(a); s:=a; end
  else
  for i:=1 to n do
        begin
         if (i=1) or (i=n) then begin
                readln(a,b);
                s:=s+b;
                end
                else begin
                        readln(a,b,c);
                        s:=s+c;
                        end;
        end;

  writeln(s);
 end;


begin
 citire;
end.