#include<iostream>
#include<fstream>
#include<iomanip>
using namespace std;
int n,k,st[26],x;
double s,v[26];
inline void bktr(int p,float prod) {     
	int pval,stop;     
	stop=n-k+p;     
	for(pval=st[p-1]+1;pval<=n-k+p;pval++) {         
		st[p]=pval;         
		if(p==k) {            
			s=s+2*prod*v[st[p]];             
			x=x+2;         
		}        
		else bktr(p+1,prod*v[st[p]]);     
	} 
} 
int main () {     
	int i;     
	ifstream f("dezastru.in");     
	ofstream g("dezastru.out");     
	f>>n>>k;     
	for(i=1;i<=n;i++)  f>>v[i];     
	f.close();     
	bktr(1,1);     
	g<<fixed;     
	g<<setprecision(6)<<s/x;     
	g.close();     
	return 0; 
}