#include <iostream>
#include <fstream>
using namespace std;
ifstream fin("dezastru.in");
ofstream fout("dezastru.out");
int stc[10001],f[100],n,k,l;
double a[100],xd[100],sum;
void permutare(int nivel,int u,double produs)
{
    if(nivel>k)
    {
        l++;
        sum+=produs;
        return;
    }
    for(int i=u+1;i<=n-k+nivel;i++)
    {
        permutare(nivel+1,i,produs*a[i]);
    }
}
int main()
{
    fin >>n>>k;
    for(int i=1; i<=n; i++)
        fin>>a[i];
    permutare(1,0,1);
    fout<<sum/l;
    return 0;
}