#include<fstream.h>

int j,n,k,t,u,x[40],i;

long double p,s,a[40],b[40][40];

int main()
{
 ifstream f("dezastru.in");
 ofstream g("dezastru.out");
 f>>n>>t;
 for(i=1;i<=n;i++){f>>a[i];b[i][0]=a[i];}
 for(i=1;i<=n;i++)
  for(j=1;j<=i;j++)
   b[i][j]=b[i-1][j]+a[i]*b[i-1][j-1];
 s=b[n][k];
 for(i=t+1;i<=n;i++)s/=i;
 for(i=1;i<=n-t;i++)s*=i;
 g<<s;
 g.close();
 return 0;
 }