#include<stdio.h>
float v[26],a[27][27],sol;
int n,k;

void read()
{
	FILE*f=fopen("dezastru.in","r");
	fscanf(f,"%d%d",&n,&k);
	int i=0;
	for(;i<n;++i)
		fscanf(f,"%f",&v[i]);
	fclose(f);
}
int main()
{
	read();	
	int i,j;
	for(i=0;i<=n;++i)
	a[i][0]=1.0;
	
	for(i=1;i<=n;++i)
	{
		for(j=1;j<=i;++j)
		a[i][j]=a[i-1][j]+a[i-1][j-1]*v[i-1];
	}
	sol=a[n][k];
	for(i=k+1;i<=n;++i)sol/=i;
	for(i=1;i<=n-k;++i)sol*=i;
	
	FILE*g=fopen("dezastru.out","w");
	fprintf(g,"%f\n",sol);
	fclose(g);
	return 0;
}