#include<fstream>
#include<iostream>
#include<iomanip>
#include<cmath>
using namespace std;
ifstream fin("dezastru.in");
ofstream fout("dezastru.out");
int st[50],n,k,nrs,i;
double s,v[50],rez,r[50],a[50],z;

int fact(int x)
{
    int y=1;
    for(int i=1;i<=x;i++)
        y*=i;
    return y;
}

int validare(int niv)
{
    for(int i=1;i<niv;i++)
    {
        if(st[i]==st[niv])
            return 0;
    }
    return 1;
}

void bkt(int niv)
{
    int i;
    for(i=1;i<=n;i++)
    {
        st[niv]=i;
        if(validare(niv)==1)
        {
            if(niv==n)
            {
                nrs++; double x=z;
                for(int j=k+1;j<=n;j++)
                {
                    cout<<v[st[j]]<<" ";
                    x/=v[st[j]];
                }
                rez+=x;
            }
            else
                bkt(niv+1);
        }
    }
}

int main()
{
    fin>>n>>k; z=1;
    for(i=1;i<=n;i++)
    {
        fin>>v[i];
        z*=v[i];
    }
    rez=0;
    bkt(1);
    rez/=nrs;
    fout<<fixed<<setprecision(6)<<rez;
    return 0;
}