#include<iostream.h>
#include<fstream.h>
ifstream f("dezastru.in");
ofstream h("dezastru.out");
int z,n;
float s=0,y=0;
float a[100],x[100];
int valid(int k)
{int i;
if(x[k]<=x[k-1])
return 0;
return 1;}

void afis(int k)
{int i;
float p=1;
	for(i=1;i<=k;i++)
p=p*x[i];
s=s+2*p;
y=y+2;}

void back(int k)
{int i;
for(i=1;i<=n;i++)
{x[k]=a[i];
if(valid(k)==1)
	if(k==z)
	afis(k);
else
back(k+1);}}	
int main()
{int i;

f>>n>>z;
for(i=1;i<=n;i++)
	f>>a[i];
back(1);
h<<s/y;
return 0;}