##Erstellen der Zufallszahlen
N<-10000
x<-rnorm(N,mean=1,sd=1)

##Berechnungen
#(a)
sum(x<=1)/N
#(b)
sum(x<=-2)/N
#(c)
sum(x<=-5)/N
#(d)
sum((x>-5) & (x<=-2))/N
#(e)
sum((x>-2) & (x<=4))/N
#(f)
sum(x>4)/N
#(g)
sum((x<=-2) | (x>4))/N