{$R+}
label metka;
var x,i,y,z:integer;  s:string;
a: array [0..256] of longint;
f: array [0..256] of longint;
g: array [0..256] of longint;
begin
  assign(input, 'input.txt'); reset(input);
 assign(output, 'output.txt'); rewrite(output);
readln(s);
for i:=1 to 256 do a[i]:=0;
for i:=1 to 256 do f[i]:=0;
for i:=1 to 256 do g[i]:=0;
a[0]:=length(s);
for i:=1 to a[0] do a[i]:=ord(s[length(s)-i+1])-48;
readln(s);
for i:=1 to 256 do f[i]:=0;
f[0]:=length(s);
for i:=1 to f[0] do f[i]:=ord(s[length(s)-i+1])-48;
if a[0]>f[0] then z:=a[0]
else z:=f[0];
for i:=1 to z do begin
  y:=a[i]+f[i]+g[i];
  g[i]:=y mod 10;
  g[i+1]:=y div 10;
end;
i:=256;
while g[i]=0 do begin
 i:=i-1;
 if i=0 then begin i:=1; goto metka;  end;
end;
metka : for y:=i downto 1 do
write(g[y]);

end.