#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;
}