#include<stdio.h>
#define maxn 100005
#define fre freopen("shulieb.in","r",stdin);freopen("shulieb.out","w",stdout);
int f[maxn],a[maxn],n,m;
bool _Rabit(),_RABIT=_Rabit();int main(){;}
void _add(){
	int s,t,key;scanf("%d%d%d",&s,&t,&key);
	for(int i=s;i<=n;i+=(i&(-i)))f[i]+=key;
	for(int i=t+1;i<=n;i+=(i&(-i)))f[i]-=key;
}
void _out(){
	int pos,ans=0;scanf("%d",&pos);
	for(int i=pos;i>0;i-=(i&(-i)))ans+=f[i];
	printf("%d\n",ans+a[pos]);
}
bool _Rabit(){
	fre
	scanf("%d",&n);
	for(int i=1;i<=n;i++)scanf("%d",&a[i]);
	scanf("%d",&m);char ch[10];
	while(m--){
		scanf("%s",ch+1);
		if(ch[1]=='A')_add();
				 else _out();
	}
}