//simpai=function(x){
//	kaisu=0;  #回数の初期値を0にする
//	for (i in 1:x) {
//		point=runif(2)
//		distant=sqrt(point[1]^2+point[2]^2)
//		if(distant<1){
//			kaisu=kaisu+1
//		}
//	}
//	answer=4*kaisu/x
//	print(answer)
//}