var s1,s2:string;
            a,b:longint;



 function atr (var s1:string; var s2:string):string;
 var i:byte; s:string;
 begin

  s:='';

  for i:=1 to length(s2)-length(s1) do
      s:=s+'0';

  s:=s+s1;

  atr:=s;
 end;



 function calcul (s1,s2:string):string;
 var suma,x1,x2,i,c,k:byte; e:integer; s:string; x:string[2];
 begin

  s:=''; c:=0;

  for i:=length(s1) downto 1 do
      begin
       suma:=0;
       val(s1[i],x1,e);
       val(s2[i],x2,e);
       suma:=x1+x2+c;
       c:=0;
       if i=1 then begin str(suma,x); s:=x+s; end
       else if suma>9 then begin c:=1; str(suma mod 10,x); s:=x+s; end
       else begin str(suma,x); s:=x+s; end;
      end;

  calcul:=s;
 end;




begin

 readln(a,b);

 str(a,s1); str(b,s2);

 if length(s1)>length(s2) then s2:=atr(s2,s1)
                          else s1:=atr(s1,s2);

 writeln(calcul(s1,s2));

end.