program ossze;
var f,g:text;
    n,m:string;
    szam1,szam2,i,hozza,eredmeny:byte;
    x:array[1..10] of byte;
    nulla:boolean;
begin
  assign(f,'adunare.in');
  reset(f);

  readln(f,n);
  if ord(n[0])<10 then
  begin
     while ord(n[0])<10 do
     insert('0',n,1);
  end;
  readln(f,m);

  if ord(m[0])<10 then
  begin
     while ord(m[0])<10 do
     insert('0',m,1);
  end;

  assign(g,'adunare.out');
  rewrite(g);
  hozza:=0;
  for i:=10 downto 1 do
  begin
     val(n[i],szam1);
     val(m[i],szam2);
     eredmeny:=szam1+szam2+hozza;
     hozza:=0;
     if eredmeny>10 then
     begin
        x[i]:=eredmeny mod 10;
        hozza:=eredmeny div 10;
     end
     else
     x[i]:=eredmeny;
  end;
  nulla:=true;
  for i:=1 to 10 do
  begin
      if (x[i]>0) or (nulla=true) then
      begin
        write(g,x[i]);
        nulla:=false;
      end;
  end;
  close(f);
  close(g);
end.