#include <bits/stdc++.h>
typedef long long ll;
typedef long double ld;
const int INF=1e9,MOD=1e9+7,ohara=1e6+10;
const ll LINF=1e18;
using namespace std;

#define rep(i,n) for(int (i)=0;(i)<(int)(n);(i)++)
#define rrep(i,a,b) for(int i=(a);i<(b);i++)
#define rrrep(i,a,b) for(int i=(a);i>=(b);i--)
#define all(v) (v).begin(), (v).end()
#define Size(n) (n).size()
#define Cout(x) cout<<(x)<<endl
#define Cerr(x) cerr<<(x)<<endl
#define fi first
#define se second
#define P pair<ll,ll> 
#define m_p make_pair
#define V vector<ll> 

ll n,cnt,ans,a[ohara],b,c,d,tmp,tmpp,m,h,w,x,y,sum,pos,k;
ld doua;
int dy[]={1,0,-1,0};
int dx[]={0,1,0,-1};
//int dy[]={-1,0,1,-1,1,-1,0,1};
//int dx[]={-1,-1,-1,0,0,1,1,1};
string alph("abcdefghijklmnopqrstuvwxyz"),s;
bool fl;
struct edge{int to,cost;};
ll rui[ohara];
ll deruta[ohara];
ll f[ohara],fr[ohara];

//-------------------------↓↓↓↓↓↓------------------------

ll mod_pow(ll xx,ll nn,ll mod){
    ll ret=1;
    while(nn>0){
        if(nn&1)ret=ret*xx%mod;
        xx=xx*xx%mod;
        nn>>=1;
    }
    return ret;
}

ll ncr(ll nn,ll r){
    if(nn<r)return 0;
    return f[nn]*fr[r]%MOD*fr[nn-r]%MOD;
}

int main(void){
       cin.tie(0);
    ios::sync_with_stdio(false);

    cin>>n;
    rep(i,n)cin>>a[i];
    f[0]=1;
          rrep(i,1,n+3){
              f[i]=f[i-1]*i%MOD;
          }
          fr[n+2]=mod_pow(f[n+2],MOD-2,MOD);
          rrrep(i,n+1,0){
              fr[i]=fr[i+1]*(i+1)%MOD;
          }
          rep(i,n){
              (ans+=ncr(n-1,i)*a[i])%=MOD;
          }
          Cout(ans);
    return 0;
}