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