$x*=(2*@n+1-$_)/$++for@n=++$x..<>;print$x