do disp(!rem((1+8*bin2dec(fgetl(0)))^.5,1))until 0