uses crt;
type vector=array[1..10000] of integer;
var m,l,y,i,r,k,n,t:integer; f,g:text; v3:vector; s1,s2:ansistring;p:boolean;
function ver(n,m:integer):boolean;
begin
if n>m then ver:=true else ver:=false;
end;
begin
clrscr;
assign(f,'adunare.in');
assign(g,'adunare.out');
reset(f);
rewrite(g);
readln(f,s1);
readln(f,s2);

p:=ver(length(s1),length(s2));

if p then k:=length(s1)-length(s2) else
k:=length(s2)-length(s1);

for i:=1 to k do begin
if p then s2:='0'+s2;
if p=false then s1:='0'+s1; end;

l:=0;
repeat
inc(l);
val(s1[l],t);
val(s2[l],r);
v3[l]:=r+t;
until l=length(s1);

repeat
inc(y);
for i:=l downto 1 do
if (v3[i]>=10) and (i<>1) then begin
m:=(v3[i] mod 10);
n:=(v3[i] div 10);
v3[i]:=m;
v3[i-1]:=v3[i-1] + n ; end;
until y=l;

for i:=1 to l do write(g,v3[i]);

close(f);
close(g);
end.