#include<fstream>
#include<cstdio>
using namespace std;
int n,k1,x[26];
double p[26],prob,probfinal;
long long nrc;

ofstream out("dezastru.out");
inline void read()
{
	freopen("dezastru.in","r",stdin);
	scanf("%d%d",&n,&k1);
	for(int i=1;i<=n;i++)
		scanf("%lf",&p[i]);
}
inline void solve()
{
	++nrc;
	prob=1;
	for(int i=1;i<=k1;i++)
	{	prob*=p[x[i]];}
	
	probfinal+=prob;
}
inline void back(int k)
{
	for(int i=x[k-1]+1;i<=n;i++)
	{
		x[k]=i;
		if(k==k1)
			solve();
		else
			back(k+1);
	}
}

int main()
{
	read();
	back(1);
	out<<probfinal/nrc;
	return 0;
}