//Vasilut
#include<cstdio>
#define NN 26

using namespace std;


float bst[NN][NN],sir[NN],comb;
int n,k;

void read();
void init();
void solve();
void write();

int main()
{
    read();
    solve();
    write();
    return 0;
}

void read()
{
    freopen("dezastru.in","r",stdin);
    freopen("dezastru.out","w",stdout);
    scanf("%d%d",&n,&k);

    for(int i=1;i<=n;i++)
    {
        scanf("%f",&sir[i]);
        bst[i][0]=1;
    }
    bst[0][0]=1;
}

void init()
{
    comb=1;
    for(int i=k+1;i<=n;i++)
    comb=comb*i;
    for(int i=i;i<=(n-k);i++)
    comb=comb/i;
}

void solve()
{
    for(int i=1;i<=n;i++)
    {
            for(int j=1;j<=k;j++)
        {
        bst[i][j]=bst[i-1][j] + bst[i-1][j-1]*sir[i];
        }
    }
    init();
}

void write()
{
    printf("%f",bst[n][k]/comb);

}