//蒟蒻一枚 rp++
//即得易见平凡，仿照上例显然。留作习题答案略，读者自证不难
//反之亦然同理，推论自然成立，略去过程Q.E.D.，由上可知证毕
#include<bits/stdc++.h>
//#pragma GCC optimize("Ofast")
#define re register
#define il inline
#define gc() getchar()
#define rep(i,a,b) for(int i=(a);i<=(b);++i)
#define repp(i,a,b) for(int i=(a);i<(b);++i)
#define per(i,a,b) for(int i=(a);i>=(b);--i)
#define tep(i,x) for(int i=head[x];~i;i=ne[i])
#define ls(x) x<<1
#define rs(x) x<<1|1
#define eps (1e-9)
#define inf 0x3f3f3f3f
#define INF 1e16
#define pii pair<int,int>
#define mp(i,j) make_pair(i,j)
#define pb push_back
#define fi first
#define sc second
using namespace std;
typedef long long LL;
typedef unsigned long long ULL;
typedef long double LD;
typedef double db;
namespace IO{
	template<typename T> inline void read(T &x){
		bool f=1;x=0;char ch=gc();
		while(ch<'0'||ch>'9'){if(ch=='-')f=0;ch=gc();}
		while(ch>='0'&&ch<='9')x=(x<<1)+(x<<3)+(ch&15),ch=gc();
		x=f?x:-x;
	}
	template<typename T> inline void write(T x){
		if(x<0) putchar('-'),x=-x;
	   	if(x>9) write(x/10);
	   	putchar(char('0'+x%10));
	}
	template <typename T,typename ...Args> inline
	void read(T &x,Args &...args){read(x);read(args...);}
	template<typename T> inline void write(T x,char c){write(x),putchar(c);}
}
using namespace IO;
//bool _ST;
const int N=1.5e5+100;
int n,q,bd[N],z[N],lcp[N];
LL w[N],sr[N],sl[N];
char S[N],T[N];
void Z_function(){
	int l=0,r=0;
	rep(i,2,n){
		if(r>=i) z[i]=min(z[i-l+1],r-i+1);
		while(i+z[i]<=n&&S[i+z[i]]==S[1+z[i]]) ++z[i];
		if(i+z[i]-1>r) l=i,r=i+z[i]-1;
	}
	l=r=0;
	rep(i,1,n){
		if(r>=i) lcp[i]=min(z[i-l+1],r-i+1);
		while(i+lcp[i]<=n&&T[i+lcp[i]]==S[1+lcp[i]]) ++lcp[i];
		if(i+lcp[i]-1>r) l=i,i+lcp[i]-1;
	}
}
void border(){
	bd[0]=bd[1]=0;
	int k=0;
	sr[1]=w[1];
	rep(i,2,n){
		while(k&&S[i]!=S[k+1]) k=bd[k];
		bd[i]=(S[i]==S[k+1])?++k:0;
		sr[i]=sr[bd[i]]+w[i];
	}
}
struct SGT{
	int mx[N*4];
	void build(int x,int l,int r){
		if(l==r) return mx[x]=l+lcp[l]-1,void();
		int mid=l+r>>1;
		build(ls(x),l,mid),build(rs(x),mid+1,r);
		mx[x]=max(mx[ls(x)],mx[rs(x)]);
	}
 	int work(int x,int l,int r,int L,int R){
 		if(mx[x]<=R) return 0;
 		if(l==r) return l;
		int mid=l+r>>1,res;
 		if(L<=mid&&(res=work(ls(x),l,mid,L,R))) return res;
 		if(mid<R&&(res=work(rs(x),mid+1,r,L,R))) return res;
 		return 0;
	}
}TR;
//bool _ED;
signed main(){
	//fprintf(stderr,"%.20lf MB\n",(&_ST-&_ED)/1048576.0);
	//freopen(".in","r",stdin);
	//freopen(".out","w",stdout);
	read(n,q);
	cin>>(S+1)>>(T+1);
	rep(i,1,n) read(w[i]);
	Z_function();
	border();
	rep(i,1,n) w[i]+=w[i-1],sr[i]+=sr[i-1];
	rep(i,1,n) sl[i]=sl[i-1]+w[lcp[i]];
//	rep(i,1,n) cout<<lcp[i]<<" "<<sl[i]<<" "<<sr[i]<<endl;
	TR.build(1,1,n);
	rep(i,1,q){
		int l,r,pos;
		read(l,r);
		pos=TR.work(1,1,n,l,r);
		if(!pos) write(sl[r]-sl[l-1],'\n');
		else write(sl[pos-1]-sl[l-1]+sr[r-pos+1],'\n');
	}
	//fprintf(stderr,"%.4lf s\n",1.0*clock()/CLOCKS_PER_SEC);
	return 0;
}
//谨记:
//十年OI一场空，不开longlong见祖宗
//数据千万条，清空第一条。多测不清空，爆零两行泪。清空不规范，TLE总相伴。
//快读要加类型名