#include <fstream>
#include <iomanip>

using namespace std;

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

int n, k, i, nr, sol[30];
double produs, v[30];

bool ok (int poz)
{
 int i;
  for (i=1; i<poz; i++)
     if (sol[i] >= sol[poz])
       return false;
  return true;
}

void adauga ()
{
  double aux = 1;
  int i;
   for (i=1; i<=k; i++)
       aux *= v[sol[i]];
  produs += aux;
}

void bkt (int poz)
{
   for (int i=1; i<=n; i++)
   {
       sol[poz]= i;
        if (ok(poz))
        {
            if (poz == k)
            {
                nr ++;
                adauga();
            }
            else
                bkt(poz+1);
        }
   }
}

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