#include <fstream>
using namespace std;
double atac[64],pos=0.0;
int n,k,cou=0;
ifstream f("dezastru.in");
ofstream o("dezastru.out");

void bkt(int p,int init,double poz)
{
	if (p==k) 
	{
		pos+=poz;
		cou++;
		return;
	} 
	for (int i=init;i<=n-k+p;i++)
		bkt(p+1,i+1,poz*atac[i]);
}

int main()
{
	int i;
	f>>n>>k;
	for (i=0;i<n;i++)
		f>>atac[i];
	bkt(0,0,1);
	o<<pos/cou;
	return 0;
}