program Project2;

{$APPTYPE CONSOLE}

var n,m,i,k:integer; sum:int64;
begin
assign(Input,'problem.in');
reset(Input);
readln(n,m);
close(Input);


k:=0;

if n>=m then begin
for i:=1 to n do begin
  sum:=((2+(i-1))*i) div 2;
  if (sum mod m)=0 then inc(k);
  end;
end;

assign(Output,'problem.out');
rewrite(Output);
writeln(k);
close(Output);
end.