program ex;
type complex=record
a,b:real;
end;
var v:array [1..20] of complex;
f:text;
i,c,x: integer;
q,z:real;
begin
assign (f,'complex.txt');
reset(f);
c:=0;
while not eof (f) do begin
c:=c+1;
readln (f,v[c].a ,v[c].b);
end;
close(f);
x:=0 ;
q:=0;
for i:=1 to c do begin
z:=z+v[i].a;
q:=q+v[i].b;
end;
writeln(z,' ',q);
readln;
end.