#include<bits/stdc++.h>

using namespace std;

typedef long long ll;

#define m_k make_pair

const int inf=(int)(2e9);

const ll INF=(ll)(5e18);

const int N=;

const ll MOD=;

 

ll a[N][],d[N],ans=;

int n,len[N],t[];

ll dp[N][][];

 

int fd(ll x,int id)

{

    int ret=;

    while(x)

    {

        a[id][++ret]=x%;

        x/=;

    }

    return ret;

}

 

int main()

{

    memset(t,,sizeof(t));

    memset(dp,,sizeof(dp));

    scanf("%d",&n);

    for(int i=;i<=n;i++)

    {

        scanf("%lld",&d[i]);

    }

    sort(d+,d+n+);

    for(int i=;i<=n;i++)

    {

        len[i]=fd(d[i],i);

        t[len[i]]++;

    }

    for(int i=;i<=n;i++)

    {

        for(int j=;j<=len[i];j++)

        {

            ll now=;

            for(int pre=;pre<j;pre++)

            {

                dp[i][j][pre+j]+=t[pre]*;//前后两种都要考虑

                now+=t[pre];

            }

            ll sum=n-now;

            dp[i][j][j*]+=sum;

            dp[i][j][j*-]+=sum;

        }

    }

    ll ans=;

    for(int i=;i<=n;i++)

    {

        for(int j=;j<=;j++)

        {

            ll now=;

            for(int k=;k<=;k++)

            {

                if(k>) now=now*%MOD;

                ans=(ans+a[i][j]*dp[i][j][k]%MOD*now)%MOD;

            }

        }

    }

    printf("%lld\n",ans);

    return ;

}