var fin,fout:text;
    a,b,s:longint;

procedure deschidere;

begin
 assign(fin,'adunare.in');
 assign(fout,'adunare.out');
 reset(fin);
 rewrite(fout);
end;

procedure citire;

begin
 readln(fin,a);
 readln(fin,b);
end;

procedure adunare;

begin
s:=a+b;
end;

procedure scriere;

begin
 writeln(fout,s);
end;

procedure inchidere;

begin
 close(fin);
 close(fout);
end;

begin
  deschidere;
  citire;
  adunare;
  scriere;
  inchidere;
end.