#9631: WA太多了!(pascal)


xcqzb (西南位育夏春秋)


var
  n,m,j,k:longint;
begin
  while not eof do begin
    readln(n,m);
    k:=0;j:=0;
    while k<m do begin
      j:=j+1;
      k:=k+n+j-1;
    end;
    writeln(j);
  end;
  readln;
end.
 
  你看看錯誤在哪裡?