#include <fstream>
#include <iomanip>

using namespace std;

ifstream f("dezastru.in");
ofstream g("dezastru.out");

int i,j,n,k;
double a[27][27],b[27][27],v[27];

int main()
{
    f>>n>>k;

   for (i=1;i<=n;i++)
        f>>v[i];

    for (i=0;i<=25;i++)
      {
        a[i][0]=1.0;
        b[i][0]=1.0;
      }

   for (i=1;i<=n;i++)
    for (j=1;j<=k;j++)
     {
         a[i][j]=a[i-1][j]+a[i-1][j-1]*v[i];
         b[i][j]=b[i-1][j]+b[i-1][j-1];
     }

     g<<setprecision(6)<<a[n][k]/b[n][k];

    f.close();
    g.close();
}