#include<bits/stdc++.h>
using namespace std;
#define ALL(x) x.begin(),x.end()
#define rep(i,n) for(int i=0;i<(n);i++)
#define debug(v) cout<<#v<<":";for(auto x:v){cout<<x<<' ';}cout<<endl;
#define INF 1000000000
#define mod 1000000007
using ll=long long;
const ll LINF=1001002003004005006ll;
int dx[]={1,0,-1,0};
int dy[]={0,1,0,-1};
// ll gcd(ll a,ll b){return b?gcd(b,a%b):a;}
template<class T>bool chmax(T &a,const T &b){if(a<b){a=b;return true;}return false;}
template<class T>bool chmin(T &a,const T &b){if(b<a){a=b;return true;}return false;}

template<typename Monoid, typename OperatorMonoid=Monoid>
struct LazySegmentTree{
    // Monoid: 要素  OperatorMonoid: 作用素
    // 各マージ関数
    using F=function<Monoid(Monoid,Monoid)>;
    using G=function<Monoid(Monoid,OperatorMonoid)>;
    using H=function<OperatorMonoid(OperatorMonoid,OperatorMonoid)>;
 
    int sz,height;
    vector<Monoid> data;
    vector<OperatorMonoid> lazy;
    const F f;
    const G g;
    const H h;
    // 単位元
    const Monoid M1;
    const OperatorMonoid OM0;
 
    LazySegmentTree(int n,const F f,const G g,const H h,const Monoid &M1,const OperatorMonoid OM0)
    : f(f),g(g),h(h),M1(M1),OM0(OM0) {
        sz=1;height=0;
        while(sz<n) sz<<=1,height++;
        data.assign(2*sz,M1);lazy.assign(2*sz,OM0);
    }
 
    void set(int k,const Monoid &x){
        data[k+sz]=x;
    }
 
    //セグ木のbuild
    void build(){
        for(int k=sz-1;k>0;k--) data[k]=f(data[2*k+0],data[2*k+1]);
    }
 
    //伝播させる
    inline void propagate(int k){
        if(lazy[k]!=OM0){
            //子に伝えた後にkの場所のデータのほうの更新
            lazy[2*k+0]=h(lazy[2*k+0],lazy[k]);
            lazy[2*k+1]=h(lazy[2*k+1],lazy[k]);
            data[k]=reflect(k);
            lazy[k]=OM0;
        }
    }
 
    inline Monoid reflect(int k){
        return lazy[k]==OM0?data[k]:g(data[k],lazy[k]);
    }
    inline void recalc(int k){
        //下から上にdataの値を計算しなおす
        while(k>>=1)data[k]=f(reflect(2*k+0),reflect(2*k+1));
    }
    inline void thrust(int k){
        for(int i=height;i>0;i--) propagate(k>>i);
    }
 
    void update(int a,int b,const OperatorMonoid &x){
        thrust(a+=sz);
        thrust(b+=sz-1);
        for(int l=a,r=b+1;l<r;l>>=1,r>>=1){
            if(l&1) lazy[l]=h(lazy[l],x),l++;
            if(r&1) --r,lazy[r]=h(lazy[r],x);
        }
        //recalcすればpが要らない
        recalc(a);
        recalc(b);
    }
 
    Monoid query(int a,int b){
        thrust(a+=sz);
        thrust(b+=sz-1);
        Monoid L=M1,R=M1;
        for(int l=a,r=b+1;l<r;l>>=1,r>>=1){
            if(l&1) L=f(L,reflect(l++));
            if(r&1) R=f(reflect(--r),R);
        }
        return f(L,R);
    }
    
    Monoid operator[](const int &k){
        return query(k,k+1);
    }
};

using tp=tuple<ll,ll,ll>;

tp f(tp a,tp b){
    return tp(get<0>(a)+get<0>(b),get<1>(a)+get<1>(b),get<2>(a)+get<2>(b));
}

tp g(tp a,ll b){
    ll x2,x,cnt;
    tie(x2,x,cnt)=a;
    return tp(x2+b*b*cnt+2*x*b,x+cnt*b,cnt);
}

ll h(ll a,ll b){
    return a+b;
}




signed main(){
    cin.tie(0);
    ios::sync_with_stdio(0);
    
    int n;cin>>n;
    LazySegmentTree<tp,ll> seg(n,f,g,h,tp(0,0,0),0);
    rep(i,n){
        ll a;cin>>a;
        seg.set(i,tp(a*a,a,1));
    }
    seg.build();
    int q;cin>>q;
    while(q--){
        int t;cin>>t;
        if(t==1){
            int l,r;ll x;cin>>l>>r>>x;l--;
            seg.update(l,r,x);
        }else{
            int l,r;cin>>l>>r;l--;
            cout<<(get<0>(seg.query(l,r)))<<endl;
        }
    }

    return 0;
}