#include<iostream>
using namespace std;
#include<fstream>
ifstream f("dezastru.in.txt");
ofstream g("dezastru.out.txt");
int n,k,i,j,u;
float a[26],c[26][26],t,z;
long long fact(int nr)
{long long p=1;
for(i=1;i<=nr;i++)
 p=p*i;
 return p;}
int main()
{
    f>>n>>k;
    for(i=1;i<=n;i++)
        f>>a[i];
     c[0][0]=1;
        for(i=1;i<=n;i++)
            for(j=1;j<=n;j++)
            c[i][j]=c[i-1][j]+c[i-1][j-1]*a[i];
           t=fact(n)/(fact(n-k)*fact(k));
              g<<("%.6f",c[n][k]/t);
              g.close();
}