#include <bits/stdc++.h>
using namespace std;
ifstream fin("dezastru.in");
ofstream fout("dezastru.out");
const int NMAX = 30;
double a[NMAX],rasp;
int n,k;

int fact(int n){
    int rasp=1;
    for(int i=1;i<=n;i++) rasp*=i;
    return rasp;
}

void bkt(double pr,int k,int last){
    if(k==0){
        rasp+=pr;
        return;
    }
    for(int i=last+1;i<=n;i++){
        bkt(pr*a[i],k-1,i);
    }
}

int main()
{
    fin >> n >> k;
    for(int i=1;i<=n;i++) fin >> a[i];
    for(int i=1;i<=n;i++) bkt(a[i],k-1,i);
    int nrr=fact(n)/(fact(n-k)*fact(k));
    fout << fixed << setprecision(6) << (double)(rasp/(double)(nrr));
    return 0;
}