众所周知分块有个trick就是设ans[i][j]表示第i块到第j块的答案。

然后还是用块内排序+二分处理ans数组，最后复杂度 $O(n \sqrt{n})$ 过了？

//writer:Oier_szc

#include <bits/stdc++.h>
#define TS puts("I AK IOI");
using namespace std;
const int N=1e6+5,M=1e3+5;
int n,m;
int a[N];
int b[N];
int Swap[N];
int p[N],lst[N],nxt[N];
int bel[N],st[M],ed[M];
int ans[M][M];
int main()
{
	scanf("%d",&n);
	int maxn=0;
	for(int i=1;i<=n;++i)
	{
		scanf("%d",&a[i]);
		maxn=max(maxn,a[i]);
		lst[i]=b[i]=p[a[i]];
		p[a[i]]=i;
	}
	for(int i=1;i<=n;++i) p[a[i]]=n+1;
	for(int i=n;i>=1;--i)
	{
		nxt[i]=p[a[i]];
		p[a[i]]=i;
	}
	int sq=sqrt(n);
	for(int i=1;i<=sq;++i)
	{
		st[i]=n/sq*(i-1)+1;
		ed[i]=n/sq*i;
	}
	ed[sq]=n;
	for(int i=1;i<=sq;++i)
	{
		for(int j=st[i];j<=ed[i];++j)
		{
			bel[j]=i;
		}
		sort(b+st[i],b+ed[i]+1);
	}
	int qwq;
	for(int i=1;i<=sq;++i)
	{
		for(int j=i;j<=sq;++j)
		{
			ans[i][j]=ans[i][j-1];
			qwq=lower_bound(b+st[j],b+ed[j]+1,st[i])-b;
			ans[i][j]+=qwq-st[j];
		}
	}
	int l,r,res=0;
	scanf("%d",&m);
	while(m--)
	{
		scanf("%d%d",&l,&r);
		if(bel[l]==bel[r])
		{
			res=0;
			for(int i=l;i<=r;++i)
			{
				res+=(lst[i]<l);
			}
			printf("%d\n",res);
		}
		else
		{
			res=ans[bel[l]+1][bel[r]-1];
			for(int i=l;i<=ed[bel[l]];++i)
			{
				res+=(nxt[i]>ed[bel[r]-1]);
			}
			for(int i=st[bel[r]];i<=r;++i)
			{
				res+=(lst[i]<l);
			}
			printf("%d\n",res);
		}
	}
	return 0;
}

所以数据还是不够强。可以加强了。