#include <bits/stdc++.h>
#define NMAX 26
using namespace std;
ifstream f("dezastru.in");
ofstream g("dezastru.out");
int n,k,v[NMAX];
long long comb[NMAX][NMAX];
double prob[NMAX],sol;
void bkt(int r,double value)
{
    if(r==k+1)
        sol+=value/comb[n][k];
    else
    {
        for(int i=v[r-1]+1;i<=n;i++)
        {
            v[r]=i;
            bkt(r+1,value*prob[v[r]]);
        }
    }
}
int main()
{
    f>>n>>k;
    for(int i=1;i<=n;i++)
    {
        f>>prob[i];
        comb[i][1]=i;
        comb[i][i]=1;
    }
    for(int i=2;i<=n;i++)
    {
        for(int j=2;j<i;j++)
            comb[i][j]=comb[i-1][j]+comb[i-1][j-1];
    }
    bkt(1,1);
    g<<fixed<<setprecision(7)<<sol;
    return 0;
}