{$q-,r-,s-,d-,i-}
{modifica 1-sir}
const modu=194767;
var t:Text;
   sol,q,maxsuma,N,S:longint;
   function min(a,b:longint):longint;begin if a<b then min:=a else min:=b;end;
   Procedure Iesire(sol:longint);
   begin
      assign(T,'1-sir.out');rewrite(T);writeln(T,sol mod modu);close(t);
      halt(0);
   end;
   Procedure back(niv,last,suma:longint);
   begin
      if niv=n+1 then
      begin
         if suma=S then inc(sol) {else if suma<S then iesire(sol);}
      end else
      begin
         back(niv+1,last+1,suma+last+1);
         back(niv+1,last-1,suma+last-1);
      end;
   end;
begin        {sir.out}
   assign(t,'1-sir.in');reset(T);readln(T,n,s);close(T);
   maxsuma:=n*(n-1)div 2;
   if (s<-maxsuma)or(S>maxsuma)or(abs(s)and 1<>maxsuma and 1) then
   iesire(0) else begin s:=abs(s);back(2,0,0);end;
   iesire(sol);
end.