program GJPLus;
var
s1,s2,s3,st,s:string;
i,j,k,l1,l2,li,n1,n2,n3,n4:integer;
begin
readln(s1);
readln(s2);
l1:=length(s1);
l2:=length(s2);
if l1>l2 then li:=l1 else li:=l2;
n4:=0;
for i:=1 to li do begin
if i<=l1 then Val(copy(s1,(l1+1-i),1),n1,j) else n1:=0;// writeln(n1);
if i<=l2 then Val(copy(s2,(l2+1-i),1),n2,j) else n2:=0;// writeln(n2);
n3:=n1+n2+n4;
if n3>=10 then begin
n4:=n3 div 10;
n3:=n3 mod 10;
end else n4:=0;
str(n3,st);
insert(st,s3,256-i);
end;
{
if l1>=li then begin
for i:=(li+1) to l1 do begin
Val(copy(s1,l1+1-i,1),n1);
n2:=0;
n3:=n1+n2+n4;
if n3>=10 then begin
n4:=n3 div 10;
n3:=n3 mod 10;
end else n4:=0;
str(n3,st);
insert(st,s3,li+i);
end;
str(n4,st);
insert(st,s3,li+i-1);
end else if l2>=li then begin
for i:=(li+1) to l2 do begin
Val(copy(s2,l2+1-i,1),n2);
n1:=0;
n3:=n1+n2+n4;
if n3>=10 then begin
n4:=n3 div 10;
n3:=n3 mod 10;
end else n4:=0;
str(n3,st);
insert(st,s3,li+i);
end;
str(n4,st);
insert(st,s3,li+i-1);
end;
}
//output
k:=length(s3);
li:=0;
for i:=1 to k do begin
val(copy(s3,k-i+1,1),j);
if j>0 then li:=li+1;
if li>0 then write(j);
end;
readln;
end.
var
s1,s2,s3,st,s:string;
i,j,k,l1,l2,li,n1,n2,n3,n4:integer;
begin
readln(s1);
readln(s2);
l1:=length(s1);
l2:=length(s2);
if l1>l2 then li:=l1 else li:=l2;
n4:=0;
for i:=1 to li do begin
if i<=l1 then Val(copy(s1,(l1+1-i),1),n1,j) else n1:=0;// writeln(n1);
if i<=l2 then Val(copy(s2,(l2+1-i),1),n2,j) else n2:=0;// writeln(n2);
n3:=n1+n2+n4;
if n3>=10 then begin
n4:=n3 div 10;
n3:=n3 mod 10;
end else n4:=0;
str(n3,st);
insert(st,s3,256-i);
end;
{
if l1>=li then begin
for i:=(li+1) to l1 do begin
Val(copy(s1,l1+1-i,1),n1);
n2:=0;
n3:=n1+n2+n4;
if n3>=10 then begin
n4:=n3 div 10;
n3:=n3 mod 10;
end else n4:=0;
str(n3,st);
insert(st,s3,li+i);
end;
str(n4,st);
insert(st,s3,li+i-1);
end else if l2>=li then begin
for i:=(li+1) to l2 do begin
Val(copy(s2,l2+1-i,1),n2);
n1:=0;
n3:=n1+n2+n4;
if n3>=10 then begin
n4:=n3 div 10;
n3:=n3 mod 10;
end else n4:=0;
str(n3,st);
insert(st,s3,li+i);
end;
str(n4,st);
insert(st,s3,li+i-1);
end;
}
//output
k:=length(s3);
li:=0;
for i:=1 to k do begin
val(copy(s3,k-i+1,1),j);
if j>0 then li:=li+1;
if li>0 then write(j);
end;
readln;
end.