symulacje

##########################################################################################
###                                                                Szacowanie wartości p – strzelanie do tarczy                                                                     ###
##########################################################################################

n=10 ## n=1000 n=1000000
x=2*runif(n)-1
y=2*runif(n)-1
pi_=4*sum(x^2+y^2<1)/n
pi_
## prezentacja graficzna
plot(x,y,xlim=c(-1,1),ylim=c(-1,1))