#include typedef long long ll; typedef long double ld; const int INF=1e9,MOD=1e9+7,ohara=1e6+10; const ll LINF=1e18; using namespace std; #define rep(i,n) for(int (i)=0;(i)<(int)(n);(i)++) #define rrep(i,a,b) for(int i=(a);i<(b);i++) #define rrrep(i,a,b) for(int i=(a);i>=(b);i--) #define all(v) (v).begin(), (v).end() #define Size(n) (n).size() #define Cout(x) cout<<(x)< #define m_p make_pair #define V vector #define U_MAP unordered_map #define pq priority_queue #define rpq priority_queue,greater> #define p_b push_back ll n,cnt,ans,a[ohara],b,c,d,tmp,tmpp,m,h,w,x,y,sum,pos,k,q; ld doua; int dy[]={1,0,-1,0}; int dx[]={0,1,0,-1}; //int dy[]={-1,0,1,-1,1,-1,0,1}; //int dx[]={-1,-1,-1,0,0,1,1,1}; string alph("abcdefghijklmnopqrstuvwxyz"),s; bool fl; struct edge{int to,cost;}; V bucket[ohara]; const int B=1000; P p[ohara]; //------ Believe yourself as a genius!!!!!! ------ int main(void){ cin.tie(0); cout.tie(0); ios::sync_with_stdio(false); cin>>n; rep(i,n)cin>>a[i]; rep(i,n){ bucket[i/B].p_b(a[i]); } rep(i,n){ int ok1=1,ok2=1; rep(j,Size(bucket[i/B])-1){ if(bucket[i/B][j]>bucket[i/B][j+1])ok1=0; if(bucket[i/B][j]>q; rep(i,q){ cin>>b>>c; int ok1=1,ok2=1; //端を揃えます while(1){ if(b>=c)break; if(b%B==0)break; if(a[b]>a[b+1])ok1=0; if(a[b]=c)break; if(a[c]a[c-1])ok2=0; if(c%B==0)break; c--; } //cout<<"isao2"<c)break; int bb=b/B; if(ok1==1&&p[bb].fi==0)ok1=0; if(ok2==1&&p[bb].se==0)ok2=0; b+=B; } // cout<