#include <fstream>
#include <iomanip>
using namespace std;
ifstream fin("dezastru.in");
ofstream fout("dezastru.out");

int n,k,st[30],viz[30];
float v[30],sum;

void tipar(int vf)
{
    int j;
    float p=1.0;
    for(j=1;j<=vf;j++)
        p=p*v[st[j]];
    sum+=p;
}

void bkt(int vf)
{
    int j;
    for(j=1;j<=n;j++)
    {
        if(viz[j]==0)
        {
            st[vf]=j;
            viz[j]=1;
            if(vf==k)
                tipar(vf);
            else if(vf<k)
                    bkt(vf+1);
            viz[j]=0;
        }
    }
}

int main()
{
    int i;
    fin>>n>>k;
    for(i=1;i<=n;i++)
    {
        fin>>v[i];
    }
    bkt(1);
    for(i=2;i<=n;i++)
        sum/=i;
    fout<<setprecision(6)<<sum;
    ///fout<<sum;
    return 0;
}