program task_e;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
 n,m,i:longint;
 ans,d:int64;
 f:text;
begin
assign(f,'problem.in');
reset(f);
readln(f,n,m);

close(f);
ans:=0;
for i:=1 to n do
begin
d:=(i*(i+1)) div 2;
if (d mod m)=0 then ans:=ans+1;

end;

assign(f,'problem.out');
rewrite(f);
writeln(f,ans);

close(f);

  { TODO -oUser -cConsole Main : Insert code here }
end.