#include <stdio.h>

int N, K, i;

double A[32], produs, suma;

int a[32], s[32], f[32];

int main()
{
	freopen("dezastru.in", "r", stdin);
	freopen("dezastru.out", "w", stdout);

	scanf("%d%d", &N, &K);
	for (i = 1; i <= N; ++i)
		scanf("%lf", &A[i]);

	for(a[1]=1;a[1]<=N;++a[1])
	for(s[2]=K>=2?a[2-1]+1:0,f[2]=K>=2?N:0,a[2] = s[2];a[2]<=f[2];++a[2])
	for(s[3]=K>=3?a[3-1]+1:0,f[3]=K>=3?N:0,a[3] = s[3];a[3]<=f[3];++a[3])
	for(s[4]=K>=4?a[4-1]+1:0,f[4]=K>=4?N:0,a[4] = s[4];a[4]<=f[4];++a[4])
	for(s[5]=K>=5?a[5-1]+1:0,f[5]=K>=5?N:0,a[5] = s[5];a[5]<=f[5];++a[5])
	for(s[6]=K>=6?a[6-1]+1:0,f[6]=K>=6?N:0,a[6] = s[6];a[6]<=f[6];++a[6])
	for(s[7]=K>=7?a[7-1]+1:0,f[7]=K>=7?N:0,a[7] = s[7];a[7]<=f[7];++a[7])
	for(s[8]=K>=8?a[8-1]+1:0,f[8]=K>=8?N:0,a[8] = s[8];a[8]<=f[8];++a[8])
	for(s[9]=K>=9?a[9-1]+1:0,f[9]=K>=9?N:0,a[9] = s[9];a[9]<=f[9];++a[9])
	for(s[10]=K>=10?a[10-1]+1:0,f[10]=K>=10?N:0,a[10] = s[10];a[10]<=f[10];++a[10])
	for(s[11]=K>=11?a[11-1]+1:0,f[11]=K>=11?N:0,a[11] = s[11];a[11]<=f[11];++a[11])
	for(s[12]=K>=12?a[12-1]+1:0,f[12]=K>=12?N:0,a[12] = s[12];a[12]<=f[12];++a[12])
	for(s[13]=K>=13?a[13-1]+1:0,f[13]=K>=13?N:0,a[13] = s[13];a[13]<=f[13];++a[13])
	for(s[14]=K>=14?a[14-1]+1:0,f[14]=K>=14?N:0,a[14] = s[14];a[14]<=f[14];++a[14])
	for(s[15]=K>=15?a[15-1]+1:0,f[15]=K>=15?N:0,a[15] = s[15];a[15]<=f[15];++a[15])
	for(s[16]=K>=16?a[16-1]+1:0,f[16]=K>=16?N:0,a[16] = s[16];a[16]<=f[16];++a[16])
	for(s[17]=K>=17?a[17-1]+1:0,f[17]=K>=17?N:0,a[17] = s[17];a[17]<=f[17];++a[17])
	for(s[18]=K>=18?a[18-1]+1:0,f[18]=K>=18?N:0,a[18] = s[18];a[18]<=f[18];++a[18])
	for(s[19]=K>=19?a[19-1]+1:0,f[19]=K>=19?N:0,a[19] = s[19];a[19]<=f[19];++a[19])
	for(s[20]=K>=20?a[20-1]+1:0,f[20]=K>=20?N:0,a[20] = s[20];a[20]<=f[20];++a[20])
	for(s[21]=K>=21?a[21-1]+1:0,f[21]=K>=21?N:0,a[21] = s[21];a[21]<=f[21];++a[21])
	for(s[22]=K>=22?a[22-1]+1:0,f[22]=K>=22?N:0,a[22] = s[22];a[22]<=f[22];++a[22])
	for(s[23]=K>=23?a[23-1]+1:0,f[23]=K>=23?N:0,a[23] = s[23];a[23]<=f[23];++a[23])
	for(s[24]=K>=24?a[24-1]+1:0,f[24]=K>=24?N:0,a[24] = s[24];a[24]<=f[24];++a[24])
	for(s[25]=K>=25?a[25-1]+1:0,f[25]=K>=25?N:0,a[25] = s[25];a[25]<=f[25];++a[25])
	{
		for (produs = 1, i = 1; i <= K; ++i)
			produs *= A[a[i]];

		suma += produs;
	}

	for (produs = 1, i = K+1; i <= N; produs *= i, ++i);

	suma /= produs;

	printf("%.6lf\n", suma);

	return 0;
}