program ex_1;
var f,g:text;
		x,y,a,b:longint;
		i,k,l,aux:integer;
		v,w:array [1..20] of integer;
		o:array [1..21] of integer;
begin
	assign(f,'adunare.in');
	reset(f);
	assign(g,'adunare.out');
	rewrite(g);

	readln(f,x);
	readln(f,y);

	a:= x;
	b:= y;
	i:= 1;
	while a <> 0 do
		begin
			v[i]:= a mod 10;
			a:= a div 10;
			i:= i + 1;
			k:= i-1;
		end;
	i:= 1;
	while b <> 0 do
		begin
			w[i]:= b mod 10;
			b:= b div 10;
			i:= i + 1;
			l:= i-1;
		end;
	aux:= 0;
	if l > k then
		begin
			for i:= 1 to l do
			 o[i]:= v[i]+ w[i]+ aux;
			 if o[i] > 9 then
				 begin
					 o[i]:= o[i] mod 10;
					 aux:= o[i] div 10;
				 end;
for i:= l downto 1 do
 write(g,o[i]);
		end
						else
		begin
			for i:=1 to k+1 do
			 o[i]:= v[i] + w[i]+ aux;
			 if o[i] > 9 then
				 begin
					 o[i]:= o[i] mod 10;
					 aux:= o[i] div 10;
				 end;
for i:= k downto 1 do
 write(g,o[i]);
		end;
close(f);
close(g);
end.