#include<fstream>
using namespace std;
int j,n,k,t,u,i;
long double p,s,v[40],m[40][40];
int main()
{ifstream q("dezastru.in");
ofstream w("dezastru.out");
q>>n>>t;
for(i=1;i<=n;i++)
  q>>v[i];
for(i=0;i<=n;i++)
  m[i][0]=1;
for(i=1;i<=n;i++)
  for(j=1;j<=i;j++)
    m[i][j]=m[i-1][j]+v[i]*m[i-1][j-1];
s=m[n][t];
for(i=t+1;i<=n;i++)
  s/=i;
for(i=1;i<=n-t;i++)
  s*=i;
w<<s;
return 0;}