分块，有T有W

#include<bits/stdc++.h>
using namespace std;
struct block{
    int st,ed,size;
    int tag;
}k[1010];
int n,q;
int len;
vector<int> v[1010];
int a[1000005],bel[1000005];
inline void update(int x){
    for(int i=0;i<k[x].size;i++)v[x][i]=a[i+k[x].st];
    sort(v[x].begin(),v[x].end());
}
inline void add(int l,int r,int ad){
    if(bel[l]==bel[r]){
        for(int i=l;i<=r;i++)a[i]+=ad;
        update(bel[l]);
        return ;
    }
    for(int i=l;i<=k[bel[l]].ed;i++)a[i]+=ad;
    for(int i=k[bel[r]].st;i<=r;i++)a[i]+=ad;
    for(int i=bel[l]+1;i<bel[r];i++)k[i].tag+=ad;//整块修改不改变排序 
    update(bel[l]);
    update(bel[r]);
}
inline int find(int l,int r,int w){
    int cnt=0;
    if(bel[l]==bel[r]){
        for(int i=l;i<=r;i++){
            if(a[i]+k[bel[i]].tag>=w){
                cnt++;
            }
        }
        return cnt;
    }
    for(int i=l;i<=k[bel[l]].ed;i++){
        if(a[i]+k[bel[i]].tag>=w){
            cnt++;
        }
    }
    for(int i=k[bel[r]].st;i<=r;i++){
        if(a[i]+k[bel[i]].tag>=w){
            cnt++;
        }
    }
    for(int i=bel[l]+1;i<bel[r];i++){
        cnt+=v[i].end()-lower_bound(v[i].begin(),v[i].end(),w-k[i].tag);
    }
    return cnt;

}
int main(){
    scanf("%d%d",&n,&q);
    len=sqrt(n);
    for(int i=1;i<=n;i++)scanf("%d",&a[i]);
    for(int i=1;i<=len;i++){
        k[i].st=n/len*(i-1)+1;
        k[i].ed=n/len*i;
        k[i].size=k[i].ed-k[i].st+1;
        for(int j=k[i].st;j<=k[i].ed;j++){
            bel[j]=i;
            v[i].push_back(a[j]);
        }
        sort(v[i].begin(),v[i].end());
    }
    while(q--){
        char opt;
        int l,r,w;
        cin>>opt;
        scanf("%d%d%d",&l,&r,&w);
        if(opt=='M'){
            add(l,r,w);
        }
        else{
            printf("%d\n",find(l,r,w));
        }
    }
    return 0;
}