赞题库-背景图
单项选择题

投点试验计算圆周率π,编写成R模拟程序如下
MC1<-function(n){
   k<-0;x<- runif(n);y<-runif(n)
   for (i in 1:n){
     if (x[i]^2+y[i]^2<1)
        k<- k+1
    }
               
}
A、 2*k/n
B、 3*k/n
C、 4*k/n
D、 8*k/n