print 1/($N=pop)*grep{keys%{{map{int
rand 10}1..$ARGV[0]*2}}>9}1..$N