const ll C=1e6;
ll Multi(ll a,ll b,ll p) {
    ll x=a%C,y=b%C,ax=a/C,ay=b/C;
    return (x*y%p+x*ay%p*C%p+y*ax%p*C%p+ax*ay%p*C%p*C%p)%p;
}

#pragma GCC optimize(2) //吸氧羊
#pragma GCC optimize(3) //臭氧羊

register int a; //寄存器储存变量，加速，很少能起效，起的都是奇效

inline /*类型*/ /*过程名*/() //尝试将过程放到行内运行，加快一丁点的速度（通常OJ都会过滤这个关键字）

for (int i=1;i<=n;++i) //运算符放前面速度（听说）比较快
for (int i=1;i<=n;i+=4) {
     sum=sum+a[i]+a[i+1]+a[i+2]+a[i+3]; 
}
//听说这个水法挺牛逼的