#include <iostream>
#include <fstream>
#include <iomanip>

using namespace std;

ifstream in("dezastru.in");
ofstream out("dezastru.out");

double v[27];
int sol[27],f[27];
double sumf=0,c=0;
int n,k;
void read()
{
    in>>n>>k;
    for(int i=1;i<=n;i++)
    {
        in>>v[i];
    }
}

void solve(int x,double sum,int p)
{

    if(x-1==k)
    {
        sumf+=sum;
        c++;
    }
    else
    {
        for(int i=p+1;i<=n-k+x;i++)
        {
            solve(x+1,sum*v[i],i);
        }
    }
}

void print()
{
    out<<fixed<<setprecision(6)<<sumf/c;
}

int main()
{
    read();
    solve(1,1,0);
    print();
}