#include <bits/stdc++.h>

using namespace std;

typedef long long LL;
const int MOD = 1e9+7;
int N;
char v[200010];
const int blk = 200;
int bl[200010],L[200010],R[200010];
int S[200010],rv[200010],lv[200010],mv[200010],B;
int fp[200010],lp[200010];

void upd(int &x)
{
	if (x < 0) x += MOD;
	if (x >= MOD) x -= MOD;
}

int calc(int l,int r)//num---num
{
	assert(!(l==1 && r==100000));
	int sum = 0,nowv = 1;
	for (int i=l;i<=r;i+=2)
	{
		nowv = (1LL * nowv * (v[i] - '0')) % MOD;
		if (v[i+1] == '+' || i==r)
		{
			upd(sum += nowv);
			nowv = 1;
		}
	}
	return sum;
}

void build(int b)
{
	fp[b] = lp[b] = 0;
	for (int i=L[b]+1;i<R[b];i+=2)
	{
		if (v[i] == '+')
		{
			if (!fp[b]) fp[b] = i;
			lp[b] = i;
		}
	}
	S[b] = calc(L[b],R[b]-1);
	if (fp[b])
	{
		lv[b] = calc(L[b],fp[b]-1);
		rv[b] = calc(lp[b]+1,R[b]-1);
		mv[b] = S[b] - lv[b];
		upd(mv[b]);
		upd(mv[b] -= rv[b]);
	}
}

int query(int x,int y)
{
	if (bl[x] == bl[y]) return calc(x,y);
	int sum = 0,nowv = 1; 
	for (int i=x;i<R[bl[x]];i+=2)
	{
		nowv = 1LL * nowv * (v[i] - '0') % MOD;
		if (v[i+1] == '+')
		{
			upd(sum += nowv);
			nowv = 1;	
		}
	}
	for (int i=bl[x]+1;i<bl[y];i++)
	{
		if (v[R[i]] == '+')
		{
			if (fp[i])
			{
				nowv = 1LL * nowv * lv[i] % MOD;
				upd(sum += nowv);
				upd(sum += S[i]);
				upd(sum -= lv[i]);
			}
			else
			{
				nowv = 1LL * nowv * S[i] % MOD;
				upd(sum += nowv);
			}
			nowv = 1;
		}
		else
		{
			if (fp[i])
			{
				nowv = 1LL * nowv * lv[i] % MOD;
				upd(sum += nowv);
				upd(sum += mv[i]);
				nowv = rv[i];
			}
			else
			{
				nowv = 1LL * nowv * S[i] % MOD;
			}
		}
	}
	for (int i=L[bl[y]];i<=y;i+=2)
	{
		nowv = 1LL * nowv * (v[i] - '0') % MOD;
		if (v[i+1] == '+' || i==y)
		{
			upd(sum += nowv);
			nowv = 1;	
		}
	}
	return sum;
}

int main()
{
	scanf("%d",&N);
	for (int i=1;i<=N;i++)bl[i] = (i - 1) / blk + 1;
	B = bl[N];
	for (int i=1;i<=N;i++)
	{
		if (bl[i] != bl[i-1]) L[bl[i]] = i;
		if (bl[i] != bl[i+1]) R[bl[i]] = i;
	}
	for (int i=1;i<=N;i++)
	{
		char tmp[2];
		scanf("%s",tmp);
		v[i] = tmp[0];
	}
	
	for (int i=1;i<=B;i++)
	{
		build(i);
	}
	int Q;
	scanf("%d",&Q);
	while(Q--)
	{
		char tmp[2];
		int x,y;
		scanf("%s",tmp);
		scanf("%d%d",&x,&y);
		if (tmp[0] == '?')
		{
			printf("%d\n",query(x,y));
		}
		else
		{
			if (v[x] != v[y])
			{
				swap(v[x],v[y]);
				build(bl[x]);
				build(bl[y]);
			}
		}
	}
}