#include <iostream>
#include <fstream>
#include <vector>
#include <deque>
#include <iomanip>
#define nmx 30
using namespace std;
ifstream f ("dezastru.in");
ofstream g ("dezastru.out");
int n,k,m,a,b,s,ct;
double p[nmx];
double rsp;
void co (int poz,int st,double treb)
{
    if (poz==k+1)
    {
        rsp+=treb;
        ct++;
        return;
    }
    for (int i=st; i<=n-k+poz; i++)
        co(poz+1,i+1,treb*p[i]);
}
int main()
{
    f>>n>>k;
    for (int i=1; i<=n; i++)
        f>>p[i];
    co(1,1,1);
    g<<fixed<<setprecision(6)<<(double)rsp/ct;
}