program Multik;
  var
    n, k, volk: integer;
    ok: boolean; // Вместо goto
begin
  read(n, k); // k это тот же zaec
  volk:=0;
  ok:=true; // Заяц сцуко пока жив
  while (ok) and (k<n) do // Пока Зайц жив и не на последней ступени
    begin
      inc(k); // Шаг зайца
      inc(volk, 2); // Шаг волка
      if k <= volk then ok:=false; // Если встали на одну ступень или Волк дальше, то Волк съел Зайца (ok = false)
   end;
    if ok then writeln('1') else writeln('0'); // Если волк не съел (ok = true), то выводим 1, если съел то 0
    readln;
end.