#include <stdio.h>
FILE* fin  = fopen("dezastru.in","r");
FILE* fout = fopen("dezastru.out","w");

int n,m,st[30],as,ev;
long long nr;

float p[30],rez,x=1;

void init(int k){
     if(k>1)
       st[k]=st[k-1];
     else
       st[k] = 0;
}
int succ(int k){
    if(st[k]<n-m+k){st[k]++;return 1;}
    return 0;
}
int valid(int k){
    if(st[k] <= st[k-1] && k>1)return 0;

    x*=p[st[k]];

    return 1;
}
int sol(int k){
    return k==m;
}
void tipar(int k){
     nr++;
     rez+=x;

     x/=p[st[k]];
}
void back(int k){
     init(k);
     while(succ(k))
	  if(valid(k))
	    if(sol(k))tipar(k);
	    else{ back(k+1);
		  x/=p[st[k]];
	    }
}
int main(){
    int i;
    fscanf(fin,"%d%d",&n,&m);
    for(i=1;i<=n;i++)
       fscanf(fin,"%f",&p[i]);

    back(1);

    fprintf(fout,"%.6f",rez/nr);
    return 0;
}