#include<bits/stdc++.h>
#define int long long
#define N 100005
using namespace std;

int gcd(int x,int y){return y==0?x:gcd(y,x%y);}

int n,m,a[N*5],sum[N*5];
struct node{
	int x,y;
}tr[N*4],ans[N];
vector<node>qr[N];
bool operator < (node x,node y){
	if(x.y==0||y.y==0)return x.y==0;
	return x.x*y.y<y.x*x.y;
}
node Max(node x,node y){
	return (x<y)?y:x;
}

void upd(int x,int l,int r,int t,node val){
	if(l>t||r<t)return;
	if(l==r){
		tr[x]=Max(tr[x],val);return;
	}
	int mid=l+r>>1;upd(x<<1,l,mid,t,val);upd(x<<1|1,mid+1,r,t,val);
	tr[x]=Max(tr[x<<1],tr[x<<1|1]);
	return;
}
node query(int x,int l,int r,int tl,int Tr){
	if(l>Tr||r<tl)return (node){0,0};
	if(l>=tl&&r<=Tr)return tr[x];
	int mid=l+r>>1;
	return Max(query(x<<1,l,mid,tl,Tr),query(x<<1|1,mid+1,r,tl,Tr));
}

signed main(){
	scanf("%lld",&n);
	for(int i=1;i<=n;++i)scanf("%lld",&a[i]),sum[i]=sum[i-1]+a[i];
	scanf("%lld",&m);
	for(int i=1,x,y;i<=m;++i){
		scanf("%lld%lld",&x,&y);
		qr[x].push_back((node){i,y});
	}
	if(m==1){
		node Ans=(node){0,1};
		for(int i=n;i>=1;--i){
			if(a[i]==0)continue;
			for(int j=i;j<=n;++j){
				if((sum[j]-sum[i-1]<0)!=(a[i]<0))break;
				if(j-i+1>400)break;
				node val=(node){(sum[j]-sum[i-1])*(sum[j]-sum[i-1]),j-i+1};
				Ans=Max(Ans,val);
			}
		}
		int x=gcd(Ans.x,Ans.y);
		printf("%lld %lld",Ans.x/x,Ans.y/x);
		return 0;
	}
	for(int i=1;i<=n*4;++i)tr[i]=(node){0,0};
	for(int i=n;i>=1;--i){
		if(a[i]==0){
			upd(1,1,n,i,(node){0,1});
		}
		else{
			for(int j=i;j<=n;++j){
				if((sum[j]-sum[i-1]<0)!=(a[i]<0))break;
				node val=(node){(sum[j]-sum[i-1])*(sum[j]-sum[i-1]),j-i+1};
				upd(1,1,n,j,val);
			}
		}
		for(int j=0;j<qr[i].size();++j){
			ans[qr[i][j].x]=query(1,1,n,i,qr[i][j].y);
			int X=gcd(ans[qr[i][j].x].x,ans[qr[i][j].x].y);
			ans[qr[i][j].x].x/=X;ans[qr[i][j].x].y/=X;
		}
	}
	for(int i=1;i<=m;++i)printf("%lld %lld\n",ans[i].x,ans[i].y);
	return 0;
}