program Project2;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
  n, m, i, k: integer;

procedure rec(n, mod1: integer);
begin
  if (n = 0) then
  begin
    inc(k);
    exit;
  end;
  if (n mod 3 <= mod1) then
    exit;
  rec(n div 3, n mod 3);
end;

begin
  readln(n, m);
  k := 0;

  for i := n to m do
    rec(i, -1);

  writeln(k);
  readln;
  readln;
end.