#include <iostream>
#include <fstream>
using namespace std;
ifstream f("dezastru.in");
ofstream g("dezastru.out");
int n,st[30],k,nr;
float a[30],s,t=1;
void init()
{
    f>>n>>k;
    for(int i=1; i<=n; i++)
        f>>a[i];
}
void gasit()
{
    s=s+t;
    nr++;
}
void bkt(int p)
{
    for(int pval=st[p-1]+1; pval<=n; pval++)
    {
        st[p]=pval;
        t=t*a[pval];
        if(p==k)
            gasit();
        if(p<k)
            bkt(p+1);
        t=t/a[pval];
    }
}
int main()
{
    init();
    bkt(1);
    g<<s/nr;
    return 0;
}