#include <iostream>
#include <fstream>
#include <stdio.h>
using namespace std;

#define MAXN 28

FILE *fin=fopen("dezastru.in","r");
FILE *fout=fopen("dezastru.out","w");

long long c[MAXN][MAXN],n,k,i,j;
float aux;
float d[MAXN][MAXN],prob[MAXN];


int main()
{
    fscanf(fin,"%d %d\n",&n,&k);
    for(i=1;i<=n;i++) {
        fscanf(fin,"%f",&aux);
        cout<<aux<<"   ";
        prob[i]=aux;
        d[0][i]=0;
        d[i][0]=1;
    }
    c[0][0]=1;
    d[0][0]=1;
    d[1][1]=prob[1];

    for(i=1;i<=n;i++) {
        for(j=1;j<=n;j++) {
            if (i>=j)
            d[i][j]=d[i-1][j]+d[i-1][j-1]*prob[i];
            c[i][j]=c[i-1][j-1]+c[i-1][j];
        }
    }
    fprintf(fout,"%.6lf\n",d[n][k]/(c[n][k]+c[n][k+1]));
    fclose(fout);
    return 0;
}