import numpy as np from itertools import * from bisect import * from collections import * from heapq import * import sys sys.setrecursionlimit(10 ** 6) def II(): return int(sys.stdin.readline()) def MI(): return map(int, sys.stdin.readline().split()) def LI(): return list(map(int, sys.stdin.readline().split())) def SI(): return sys.stdin.readline()[:-1] def LLI(rows_number): return [LI() for _ in range(rows_number)] def LLI1(rows_number): return [LI1() for _ in range(rows_number)] int1 = lambda x: int(x) - 1 def MI1(): return map(int1, sys.stdin.readline().split()) def LI1(): return list(map(int1, sys.stdin.readline().split())) p2D = lambda x: print(*x, sep="\n") dij = [(1, 0), (0, 1), (-1, 0), (0, -1)] # a+floor(50s+50s/(0.8+0.2r))<=w # floor(50s+50s/(0.8+0.2r))<=w-a # 50s+50s/(0.8+0.2r)(450s-4w+4a-4)/(w-a+1-50s) def main(): n,s,wi=MI() aa=LI() w=aa[wi]+100*s print(w) del aa[wi] ans=1 n-=1 for i,a in enumerate(sorted(aa,reverse=True)): def score(r): return 50*s+250*s//(4+r) def rank(a): l=0 r=n+1 while l+1w:l=m else:r=m return r r=rank(a) # r=(450*s-4*w+4*a-4)//(w-a+1-50*s) ans*=max(0,n-r+1-i)/(n-i) #print(a, r,max(0,n-r-i),n-i, max(0,n-r-i)/(n-i),ans) print(ans) main()