program AB;
var   x,y:text;
      a,s:longint;
begin
assign (x,'adunare.in');
assign (y,'aduncare.out');
reset (x); rewrite (y);
s:=0;
readln (x,a);
s:=s+a;
read (x,a);
s:=s+a;
write (y,s);
close (x);
close (y);
end.