前言

不得不说，可持久化数据结构真是太难了！

由于数据结构这东西真的太玄学了，学这个主席树我真的学了很久。

---

简介

主席树为什么叫主席树？据说因为它是一个名字缩写为$HJT$的神犇发明的，与当时主席的名字缩写一样…

主席树实质上就是一棵可持久化线段树，它的具体实现可以看下面。

---

让我们从值域线段树开始说起

要学主席树，我们就要先学值域线段树。

值域线段树的区间存的并不是节点信息，而是在值在某一范围内的数的个数。

如图就是一棵值域线段树，其中1号节点存储的是大于等于1小于等于4的数字个数，2号节点存储的是大于等于1小于等于2的数字个数，3号节点存储的是大于等于3小于等于4的数字个数，4号节点存储的是等于1的数字个数，5号节点存储的是等于2的数字个数，6号节点存储的是等于3的数字个数，7号节点存储的是等于4的数字个数。

值域线段树的查询也挺简单的，若要查询这段区间内的第$k$大，只要比较当前元素的左子树大小加1（1是当前元素本身的大小）与询问的$k$，若大于等于，就访问左子树，否则将$k$减去当前元素的左子树大小加1，然后访问右子树。

这和平衡树有什么区别！！！

还有一个问题，就是值域线段树存储的区间范围是固定的，所以如果要查询区间第$k$大，我们就不能只用一棵值域线段树。

考虑建$n$棵值域线段树，每棵值域线段树存储区间$[1,i]$的信息，这样一来，要查询$[l,r]$的第$k$大时，只要在查询的过程中，将第$r$棵值域线段树的信息减去第$l-1$棵值域线段树的信息即可，这利用了前缀和的思想。
或许你会问，这有什么用？建$n$棵树，内存那么大，我平衡树第一个不服！

好吧，不服就不服，值域线段树还是有点用的，因为平衡树没法可持久化啊（**可持久化$Treap$**请走开）！

---

从值域线段树到主席树

知道了值域线段树，我们就可以开始尝试实现主席树了。

来研究一下下面两棵分别存储$[1,3]$和$[1,4]$区间信息的值域线段树（圆圈中为以该节点为根的子树大小）。

仔细观察可得，我们每次新加入一个节点，有影响的只有图中$标红$的节点。

再仔细观察一下，这些节点都在一条链上（废话）。

那么，我们就会有一个大胆的想法：可不可以每次只新建一条链而不是一棵树，就像下面这样？

这就是传说中的主席树了。

---

主席树的具体实现

当然，真正实现主席树时，还是有一些细节要注意的。

这里就不多讲了，直接上代码吧：（洛谷板子题）

#include<bits/stdc++.h>
#define max(x,y) ((x)>(y)?(x):(y))
#define min(x,y) ((x)<(y)?(x):(y))
#define LL long long
#define swap(x,y) (x^=y,y^=x,x^=y)
#define tc() (A==B&&(B=(A=ff)+fread(ff,1,100000,stdin),A==B)?EOF:*A++)
#define pc(ch) (pp_<100000?pp[pp_++]=(ch):(fwrite(pp,1,100000,stdout),pp[(pp_=0)++]=(ch)))
#define N 200000 
int pp_=0;char ff[100000],*A=ff,*B=ff,pp[100000];
using namespace std;
int n,Q,m,tot=0,rt[N+5],a[N+5],p[N+5];
struct Chairman_Tree
{
    
    int Son[2],Size;
}node[N<<6];
inline void read(int &x)
{
    
    x=0;int f=1;char ch;
    while(!isdigit(ch=tc())) f=ch^'-'?1:-1;
    while(x=(x<<3)+(x<<1)+ch-'0',isdigit(ch=tc()));
    x*=f;
}
inline void write(int x)
{
    
    if(x<0) pc('-'),x=-x;
    if(x>9) write(x/10);
    pc(x%10+'0');
}
inline void Build(int &rt,int l,int r)//建出一棵初始时的的树，和传统的线段树几乎一样
{
    
    rt=++tot;//新建一个节点，动态开点也是主席树中特别重要的
    int mid=l+r>>1;
    if(!(l^r)) return;
    Build(node[rt].Son[0],l,mid),Build(node[rt].Son[1],mid+1,r);//分别建树
}
inline void NewPoint(int &rt,int lst,int l,int r,int val)//新建一个节点（准确来说，应该是新建一条链）
{
    
    node[rt=++tot]=node[lst],++node[rt].Size;//动态开点，先复制原先的节点，然后将子树大小加1
    int mid=l+r>>1;
    if(!(l^r)) return;
    if(val<=mid) NewPoint(node[rt].Son[0],node[lst].Son[0],l,mid,val);//如果插入的新值比当前元素小（或等于），那么就新建一个左儿子
    else NewPoint(node[rt].Son[1],node[lst].Son[1],mid+1,r,val);//否则，新建一个右儿子
}
inline int Query(int rt1,int rt2,int l,int r,int k)//区间查询，相当于同时在两棵值域线段树上询问
{
    
    int mid=l+r>>1;
    if(!(l^r)) return l;//如果l与r相等，就返回l
    if(node[node[rt2].Son[0]].Size-node[node[rt1].Son[0]].Size>=k) return Query(node[rt1].Son[0],node[rt2].Son[0],l,mid,k);//如果当前左子树大小加1大于等于询问的k，那么访问左子树
	else return Query(node[rt1].Son[1],node[rt2].Son[1],mid+1,r,k-node[node[rt2].Son[0]].Size+node[node[rt1].Son[0]].Size);//否则，将k减去当前左子树大小加1
}
inline int num(int x)//求出一个数离散化后的值，一个二分的过程
{
    
    int l=1,r=m;
    while(l<=r)
    {
    
        int mid=l+r>>1;
        if(p[mid]==x) return mid;
        else if(p[mid]>x) r=mid-1;
        else l=mid+1;
    }
}
int main()
{
    
    register int i;
    for(read(n),read(Q),i=1;i<=n;++i) read(a[i]),p[i]=a[i];
    for(sort(p+1,p+n+1),Build(rt[0],i=1,m=unique(p+1,p+n+1)-p-1);i<=n;++i) NewPoint(rt[i],rt[i-1],1,m,num(a[i]));//将元素离散化，新建一棵树以及n条链，注意存储每条链的根节点的编号
    for(i=1;i<=Q;++i)//询问
    {
    
        int x,y,k;
        read(x),read(y),read(k),write(p[Query(rt[x-1],rt[y],1,m,k)]),pc('\n');//利用前缀和思想
    }
    return fwrite(pp,1,pp_,stdout),0;
}