#include<fstream>

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

float v[26];
int n,k,aux;
float A[26][26];
float comb;

int main()
{

   f>>n>>k;
   aux=n-k;
   for(int i=1;i<=n;i++) f>>v[i];
   for(int i=0;i<=25;i++) A[i][0]=1;
   for(int i=1;i<=25;i++) for(int j=1;j<=25;j++) A[i][j]=A[i-1][j]+(A[i-1][j-1]*v[i]);
   comb=1;
   for(int i=k+1;i<=n;i++)
   {
       comb*=float(i)/float(aux);
       if(aux>1)
           aux--;
   }
   g<<A[n][k]/comb;
}