program E;

{$APPTYPE CONSOLE}

uses
  SysUtils;
const
 fin='problem.in';
 fout='problem.out';
var
 fi, fo:text;
 n,i, m,s,count :integer;
 kon:array[1..10000] of integer;
begin
  assign(fi,fin);
  reset(fi);
  read(fi, n,m);
  close(fi);
  s:=0;
  count:=0;
  for i:= 1 to n do begin
  kon[i]:=i;
  s:=s+kon[i];
  if (s mod m = 0) then count:=count+1;
  end;
  assign(fo,fout);
  rewrite(fo);
  write(fo, count);
  close(fo);
end.