var a,b,i,sn,sc: integer;
begin
readln(a);
readln(b);
sc:=0;
sn:=0;
for i:=a to b do
if i mod 2=0 then sc:=sc+i
else sn:=sn+i;
write(sc-sn);
end.
var a,b,i,sn,sc: integer;
begin
readln(a);
readln(b);
sc:=0;
sn:=0;
for i:=a to b do
if i mod 2=0 then sc:=sc+i
else sn:=sn+i;
write(sc-sn);
end.