#include<iostream>
#include<fstream>
using namespace std;

/*int ios::precision(int p)//重新設(shè)置顯示精度
{
	int x=x_precision;
	x_precision=p;
	return x;
}*/

int Swap(double&a,double&b)
{//交換a與b的值
	double temp=a;a=b;b=temp;
	return 0;
}

int Partition(double a[],int p,int r)
{
	int i=p,j=r+1;
	double x=a[p];
	//將<=x的元素交換到左邊區(qū)域
	//將>=x的元素交換到右邊區(qū)域
	while(true)
	{
		while(a[++i]<x);
		while(a[--j]>x);
		if(i>=j) break;
		Swap(a[i],a[j]);
	}
	a[p]=a[j];
	a[j]=x;
	return j;
}


void QuickSort(double a[],int p,int r)
{
	if(p<r)
	{
		int q=Partition(a,p,r);
		QuickSort(a,p,q-1);//對左半段排序
		QuickSort(a,q+1,r);//對右半段排序
	}
}

int main()
{
	ifstream in("input.txt");
    ofstream out("output.txt");
    int p=30;
    out.precision(p);

	int n,s;
	double time=0;
	double a[100000];
	double time1[100000];
	in>>n>>s;
	for(int i=0;i<=n-1;i++)
		in>>a[i];
	QuickSort(a,0,n-1);
	for(i=0;i<=s-1;i++)
		time1[i]=a[i];
	for(int j=s;j<=n-1;j++)
		time1[j]=time1[j-s]+a[j];
	for(i=0;i<=n-1;i++)
		time+=time1[i];
	out<<time/n<<endl;
	return 0;
}