记录编号	241471	评测结果	AAWWWWWWWW
题目名称	[COCI 2016] PERICA	最终得分	20
用户昵称	Slowy	是否通过	未通过
代码语言	C++	运行时间	0.204 s
提交时间	2016-03-25 16:43:11	内存使用	0.70 MiB

//perica.cpp
#include <iostream>
#include <cstdio>
#include <algorithm>
using namespace std;

const int maxn=100100;
const int p=1000000007;
int n,k,a[maxn];
long long ans,t,u,v;
void ni(long x,long y){
	long long u1,v1;
	if(y==0){
		u=1; v=0;
	}
	else{
		ni(y,x%y);
		u1=v; v1=u-x/y*v;
		u=u1; v=v1;
	}
}
int main(){
	freopen("perica.in","r",stdin);
	freopen("perica.out","w",stdout);
	scanf("%d%d",&n,&k);
	for(int i=0;i<n;++i)scanf("%d",&a[i]);
	sort(a,a+n); ans=a[k-1]; t=1;
	for(int i=k;i<n;++i){
		ni(i-k+1,p);
		if(u<0)u+=p;
		t=t*i*u;
		ans=(ans+t*a[i])%p;
	}
	cout<<ans;
	return 0;
}