# R, <s>30</s> 17 bytes

###code

    runif(1)<1/scan()                #new
    f=function(N)cat(runif(1)<1/N)   #old