var
  f, x, sum, a, b :real;

begin

  readln(a,b);
  
  x:= a; sum:= 0;
  while x <= b do
  begin
    f:= sin(x + 3)/exp(2/3 * ln(x + 3));
    sum+= f;
    x+= 0.01;
  end;
  
  writeln(sum);

end.