1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86
| #include<cstdio> #include<cstring> #include<algorithm> #include<iostream> #include<queue> #include<map> #include<stack> #include<cmath> #include<set> #include<bitset> #include<complex> #include<cstdlib> #include<assert.h> #define inc(i,l,r) for(int i=l;i<=r;i++) #define dec(i,l,r) for(int i=l;i>=r;i--) #define link(x) for(edge *j=h[x];j;j=j->next) #define mem(a) memset(a,0,sizeof(a)) #define ll long long #define eps 1e-8 #define succ(x) (1<<x) #define lowbit(x) (x&(-x)) #define mid (x+y>>1) #define sqr(x) ((x)*(x)) #define NM 200005 #define nm 400005 const double pi=acos(-1); const ll inf=1e9+7; using namespace std; ll read(){ ll x=0,f=1;char ch=getchar(); while(!isdigit(ch)){if(ch=='-')f=-1;ch=getchar();} while(isdigit(ch))x=x*10+ch-'0',ch=getchar(); return f*x; }
int n,m; ll ans,s,p[NM],inv[NM],invp[NM];
ll qpow(ll x,ll t){ ll s=1; for(;t;t>>=1,x=sqr(x)%inf)if(t&1)s=s*x%inf; return s; }
int main(){ n=read();m=read(); inc(i,1,n)ans+=read(),ans%=inf; p[0]=p[1]=invp[1]=invp[0]=inv[1]=1; inc(i,2,m)inv[i]=inv[inf%i]*(inf-inf/i)%inf,invp[i]=invp[i-1]*inv[i]%inf,p[i]=p[i-1]*i%inf; inc(k,0,m){ ll t=qpow(m-k,n-1); if(k&1)s+=inf-invp[k]*invp[m-k]%inf*t%inf*(m-k)%inf,s%=inf; else s+=invp[k]*invp[m-k]%inf*t%inf*(m-k)%inf,s%=inf; if(k&1)s+=inf-invp[k]*invp[m-k]%inf*t%inf*(n-1)%inf,s%=inf; else s+=invp[k]*invp[m-k]%inf*t%inf*(n-1)%inf,s%=inf; } return 0*printf("%lld\n",ans*s%inf); }
|