【洛谷P3384】【模板】树链剖分

题目描述

如题，已知一棵包含N个结点的树（连通且无环），每个节点上包含一个数值，需要支持以下操作：

操作1： 格式： 1 x y z 表示将树从x到y结点最短路径上所有节点的值都加上z

操作2： 格式： 2 x y 表示求树从x到y结点最短路径上所有节点的值之和

操作3： 格式： 3 x z 表示将以x为根节点的子树内所有节点值都加上z

操作4： 格式： 4 x 表示求以x为根节点的子树内所有节点值之和

输入输出格式

输入格式：
第一行包含4个正整数N、M、R、P，分别表示树的结点个数、操作个数、根节点序号和取模数（即所有的输出结果均对此取模）。

接下来一行包含N个非负整数，分别依次表示各个节点上初始的数值。

接下来N-1行每行包含两个整数x、y，表示点x和点y之间连有一条边（保证无环且连通）

接下来M行每行包含若干个正整数，每行表示一个操作，格式如下：

操作1： 1 x y z

操作2： 2 x y

操作3： 3 x z

操作4： 4 x

输出格式：
输出包含若干行，分别依次表示每个操作2或操作4所得的结果（对P取模）

输入输出样例

输入样例#1：
5 5 2 24
7 3 7 8 0
1 2
1 5
3 1
4 1
3 4 2
3 2 2
4 5
1 5 1 3
2 1 3
输出样例#1：
2
21
说明

时空限制：1s，128M

数据规模：

对于30%的数据：N<=10，M<=10

对于70%的数据：N<=1000，M<=1000

对于100%的数据：N<=100000，M<=100000

（其实，纯随机生成的树LCA+暴力是能过的，可是，你觉得可能是纯随机的么233）

样例说明：

树的结构如下：

各个操作如下：

故输出应依次为2、21(重要的事情说三遍：记得取模)

代码

#include<cstdio>
#include<cstring>
#include<iostream>
#define N 400005
int tot,n,m,rt,P,tim;
int ret[2*N],Next[2*N],Head[N];
int fa[N],son[N],size[N];
long long sum[N],lazy[N];
int pos[N],bl[N],lt[N],dep[N],v[N];
using namespace std;
inline int read()
{
    int x=0,f=1;char ch=getchar();
    while(ch<'0'||ch>'9'){if(ch=='-')f=-1;ch=getchar();}
    while(ch>='0'&&ch<='9'){x=x*10+ch-'0';ch=getchar();}
    return x*f;
}
void ins(int u,int v)
{
    tot++;
    ret[tot]=v;
    Next[tot]=Head[u];
    Head[u]=tot;
}
void dfs1(int u)
{
    size[u]=1;
    for (int i=Head[u];i;i=Next[i])
    {
        int v=ret[i];
        if (v!=fa[u])
        {
            fa[v]=u;
            dep[v]=dep[u]+1;
            dfs1(v);
            size[u]+=size[v];
            if (son[u]==0||size[v]>size[son[u]])
                son[u]=v;
        }
    }
}
void dfs2(int u,int chain)
{
    tim++;
    bl[u]=chain;
    pos[u]=tim;
    if (son[u]) dfs2(son[u],chain);
    for (int i=Head[u];i;i=Next[i])
    {
        int v=ret[i];
        if (v!=fa[u]&&v!=son[u])
        {
            dfs2(v,v);
        }
    }
    lt[u]=tim;
}
void pushdown(int p,int l,int r)
{
    if (l==r) return;
    int mid=(l+r)/2;
    lazy[p*2]+=lazy[p];lazy[p*2+1]+=lazy[p];
    lazy[p*2]%=P;lazy[p*2+1]%=P;
    sum[p*2]+=lazy[p]*(mid-l+1);sum[p*2+1]+=lazy[p]*(r-mid);
    sum[p*2]%=P;sum[p*2+1]%=P;
    lazy[p]=0;
}
void update(int p)
{
    sum[p]=(sum[p*2]+sum[p*2+1])%P;
}
void change(int p,int l,int r,int x,int y,int z)
{
    if (lazy[p]) pushdown(p,l,r);
    if (l==x&&r==y)
    {
        lazy[p]+=z;
        sum[p]+=(r-l+1)*z;
        return;
    }
    int mid=(l+r)/2;
    if (y<=mid) change(p*2,l,mid,x,y,z);
    if (x>mid) change(p*2+1,mid+1,r,x,y,z);
    if (x<=mid&&y>mid) 
    {
        change(p*2,l,mid,x,mid,z);
        change(p*2+1,mid+1,r,mid+1,y,z);
    }
    update(p);
}
long long query(int p,int l,int r,int x,int y)
{
    if (lazy[p]) pushdown(p,l,r);
    if (l==x&&r==y) return sum[p];
    int mid=(l+r)/2;
    if (y<=mid) return query(p*2,l,mid,x,y);
    if (x>mid) return query(p*2+1,mid+1,r,x,y);
    return (query(p*2,l,mid,x,mid)+query(p*2+1,mid+1,r,mid+1,y))%P;
}
void solvechange(int x,int y,int z)
{
    while (bl[x]!=bl[y])
    {
        if (dep[bl[x]]<dep[bl[y]]) swap(x,y);
        change(1,1,n,pos[bl[x]],pos[x],z);
        x=fa[bl[x]];
    }
    if (pos[x]>pos[y]) swap(x,y);
    change(1,1,n,pos[x],pos[y],z);
}
long long solvesum(int x,int y)
{
    int ans=0;
    while (bl[x]!=bl[y])
    {
        if (dep[bl[x]]<dep[bl[y]]) swap(x,y);
        ans+=query(1,1,n,pos[bl[x]],pos[x]);
        ans%=P;
        x=fa[bl[x]];
    }
    if (pos[x]>pos[y]) swap(x,y);
    ans+=query(1,1,n,pos[x],pos[y]);
    return ans%P;
}
int main()
{
    n=read();m=read();rt=read();P=read();
    for (int i=1;i<=n;i++)
        v[i]=read();
    for (int i=1;i<n;i++)
    {
        int u=read(),v=read();
        ins(u,v);ins(v,u);
    }
    dfs1(rt);
    dfs2(rt,rt);
    for (int i=1;i<=n;i++)
        change(1,1,n,pos[i],pos[i],v[i]);
    while (m--)
    {
        int opt=read(),x,y,z;
        if (opt==1)
        {
            x=read(),y=read(),z=read();
            solvechange(x,y,z);
        }
        if (opt==2)
        {
            x=read(),y=read();
            printf("%lld\n",solvesum(x,y));
        }
        if (opt==3)
        {
            x=read(),z=read();
            change(1,1,n,pos[x],lt[x],z);
        }
        if (opt==4)
        {
            x=read();
            printf("%lld\n",query(1,1,n,pos[x],lt[x]));
        }
    }
    return 0;
}