#include<stdio.h>
long long n,k,i,j,cnk=1;
float a[30][30],p[100];
long long comb[30][30];
int main(void)
{
	freopen("dezastru.in","r",stdin);
	freopen("dezastru.out","w",stdout);
	scanf("%lld%lld",&n,&k);
	for(i=0;i<=n;i++)
	{
	a[i][0]=1;
	comb[i][0]=1;
	}
	for(i=1;i<=n;i++)
		scanf("%f",&p[i]);
	for(i=1;i<=n;i++)
		for(j=1;j<=i;j++)
			a[i][j]=a[i-1][j]+p[i]*a[i-1][j-1];
	for(i=1;i<=n;i++)
		for(j=1;j<=i;j++)
			comb[i][j]=comb[i-1][j-1]+comb[i-1][j];
	printf("%.6f",a[n][k]/comb[n][k]);
	return 0;
}