#include <fstream>
using namespace std;
ifstream fin ("dezastru.in");
ofstream fout("dezastru.out");
int n,k,i,j,fact[30];
float x[30],m[30][30];

int main()
{
	fin>>n>>k;
	for(i=1;i<=n;i++)
    	fin>>x[i];
    fin.close();
	fact[0]=1;
	for(i=1;i<=n;i++)
		fact[i]=fact[i-1]*i;
	m[0][0]=1;
	for(i=1;i<=n;i++)
	{
		m[i][0]=1;
		for(j=1;j<=i;j++)
			m[i][j]=m[i-1][j]+m[i-1][j-1]*x[i];
	}
	fout<<(m[n][k]*fact[k]*fact[n-k])/fact[n];
}