#include <iostream>
#include <fstream>
#include <iomanip>
using namespace std;
ifstream f("dezastru.in");
ofstream g("dezastru.out");
int n,k,sol[25],nr;
float a[25],r;
void afis()
{   float x=1;
    nr++;
    for( int i=1 ; i<=k ; i++ )
        x*=a[sol[i]];
    r+=x;
}

int valid( int poz )
{   for( int i=1; i<poz ; i++ )
        if( sol[poz] == sol[i] ) return 0;
    return 1;
}

void bkt( int poz )
{   for( int i=1 ; i<=n ; i++ )
    {   sol[poz]=i;
        if( valid(poz))
        {   if( poz == n )
                afis();
            else
                bkt(poz+1);
        }
    }
}

int main()
{
    f>>n>>k;
    for(int i=1;i<=n;i++) f>>a[i];
    bkt(1);
    g<<setprecision(6)<<r/nr;
    return 0;
}