W, D = $<.map &:to_i

p D.downto(2).inject(W){|r, i|
  r - r / i / i
}