#include<bits/stdc++.h>
#define ls(x) (x<<1)
#define rs(x) (x<<1|1)
using namespace std;
typedef unsigned long long ull;
constexpr int M=1.5e5+5;char s[M],t[M];
ull hs[M],ht[M],pw[M],w[M],res[M],sum[M];
int n,m,l,r,ans,pos,f[M],nxt[M],tr[M<<2];
int read(){
	int x=0,f=1;char ch=getchar();
	while (!isdigit(ch)) {if (ch=='-') f=-1;ch=getchar();}
	while (isdigit(ch)) x=x*10+ch-48,ch=getchar();
	return x*f;
}
int cmp(int x,int y){return f[x]>=f[y]?x:y;}
void build(int l,int r,int x){
	if (l==r) return tr[x]=l,void();
	int mid=l+r>>1;
	build(l,mid,ls(x));build(mid+1,r,rs(x));
	tr[x]=cmp(tr[ls(x)],tr[rs(x)]);
}
int query(int L,int R,int l=1,int r=n,int x=1){
	if (f[tr[x]]<=R) return 0;
	if (l==r) return l;
	int mid=l+r>>1,ans;
	if (L<=mid&&(ans=query(L,R,l,mid,ls(x)))) return ans;
	if (R>mid&&(ans=query(L,R,mid+1,r,rs(x)))) return ans;
	return 0;
}
int main(){
	n=read();m=read();
	scanf("%s%s",s+1,t+1);
	for (int i=1;i<=n;i++) w[i]=w[i-1]+read();
	for (int i=pw[0]=1;i<=n;i++) pw[i]=pw[i-1]*233;
	for (int i=1;i<=n;i++) hs[i]=hs[i-1]*233+s[i];
	for (int i=1;i<=n;i++) ht[i]=ht[i-1]*233+t[i];
	for (int i=1;i<=n;i++){
		int l=i,r=n;f[i]=i-1;
		while (l<=r){
			int mid=l+r>>1;
			if (hs[mid-i+1]==ht[mid]-ht[i-1]*pw[mid-i+1])
				f[i]=mid,l=mid+1;
			else r=mid-1; 
		}
	}
	for (int i=1;i<=n;i++) sum[i]=sum[i-1]+w[f[i]-i+1];
	res[1]=w[1];
	for (int i=2,j=0;i<=n;i++){
		while (j&&s[j+1]!=s[i])
			j=nxt[j];
		nxt[i]=j+=s[j+1]==s[i];
		res[i]=res[i-1]+w[i]-w[i-1];
		for (int j=nxt[i];j;j=nxt[j])
			res[i]+=w[j]-w[j-1];
	}
	build(1,n,1); while (m--){
		l=read();r=read();
		pos=query(l,r);if (!pos) pos=r+1;
		printf("%llu\n",sum[pos-1]-sum[l-1]+res[r-pos+1]);
	}
	return 0;
}