/*
--------------------------------DO NOT COPY I REQUEST YOU PLEASE--------------------------
AUTHOR : Chandan Agrawal
College : Poornima College of Engg. jaipur, Raj
Mail : chandanagrawal23@gmail.com
*/
#include<bits/stdc++.h>
#include<stdio.h>
using namespace std;
#define fastio ios_base::sync_with_stdio(false);cin.tie(0);cout.tie(0);
#define MAX 100050
#define ll long long
#define ld long double
#define lli int
#define pb emplace_back
#define INF 1000000000
#define mod 1000000007
#define MOD 1000000007
// trignometric function always give value in Radians only
#define PI acos(-1) //3.1415926535897932384626433832795028
#define dsin(degree) sin(degree*(PI/180.0))
#define dcos(degree) cos(degree*(PI/180.0))
#define dtan(degree) tan(degree*(PI/180.0))
#define rsin(radian) sin(radian)
#define rcos(radian) cos(radian)
#define rtan(radian) tan(radian)
#define loop(i,n) for (lli i = 0; i < n; i++)
#define loopitr(xt,vec) for (auto xt : vec)
#define FOR(i,a,b) for (lli i = a; i < b; i+=1)
#define loop_rev(i,n) for (lli i = n-1; i >= 0; i--)
#define FOR_REV(i,a,b) for (lli i = a; i >= b; i--)
#define itr :: iterator it
#define WL(t) while(t --)
#define all(v) v.begin(),v.end()
#define makeuniq(v) v.resize(unique(all(v)) - v.begin()); //only uniq element in vector after this
#define sz(x) int(x.size())
#define F first
#define S second
#define mii map<lli,lli>
#define vi vector<lli>
#define seti set<lli>
#define pii pair<lli,lli>
#define gcd(a,b) __gcd((a),(b))
#define lcm(a,b) (a/gcd(a,b))*b
#define abs(x) ((x < 0)?-(x):x)
template <typename T>
void print(T x){cout<<x<<endl;}
template <typename T1, typename T2>
void print2(T1 x,T2 y){cout<<x<<" "<<y<<endl;}
template <typename T1, typename T2,typename T3>
void print3(T1 x, T2 y,T3 z){cout<<x<<" "<<y<<" "<<z<<endl;}
#define scanarr(a,n) for(lli i=0;i<n;i++) cin>>a[i];
#define scanvector(a,n) for(lli i=0;i<n;i++){ lli x ; cin>>x; a.push_back(x);}
#define printarr(a,n) for(lli i=0;i<n;i++) cout<<a[i]<<" "; cout<<endl;
#define printvector(vec) for(auto xt : vec) cout<<xt<<" "; cout<<"\n";
#define printset(st) for(auto xt : st) cout<<xt<<" "; cout<<"\n";
#define FD(N) fixed<<setprecision(N)
#define endl '\n'
#define deb(x) cout<<#x<<" "<<x<<endl;
/*
ifstream cinn("i3.txt");
ofstream coutt("o3.txt");
*/
bool isvowel(char v) { return (0x208222>>(v&0x1f))&1; }
lli mceil(lli a,lli b){
if(a%b==0) return(a/b);
else return(a/b +1);
}
lli mfloor(lli a,lli b){
return(a/b);
}
ll modmul(ll a, ll b) {
return ((a%mod) * (b%mod)) % mod;
}
ll modadd(ll a , ll b){
return((a%mod)+(b%mod)+mod)%mod;
}
ll modsub(ll a , ll b){
return((a%mod) - (b%mod) + mod)%mod;
}
lli fastexpo(lli a,lli b){
a = a%mod;
lli ans=1;
while(b){
if(b&1)
ans=(ans*1ll*a)%mod;
a=(a*1ll*a)%mod;
b=b/2;
}
return ans;
}
/* -----------------------------------------------------HASHING-------------------------------------------------------------------*/
/*
some key points -
1. Use (long int) to remove TLE or Memory Limit issue
2. If still Wrong answer then may be collision occur , use p as bigger prime no. p : [31,53,107,209,4793]
3. use mod either 1e9+7
4 .If it still shows WA then surely collision occurs use Double Hashing
Double Hashing -
Make Prehash Array using two different p and mod so chances of collision is less
5. use pass by reference always
*/
#define maxlen 2000005 //maximum length of string
lli pow_p[maxlen]; // p^i %m
lli p_inv[maxlen]; // this is inverse_Mod(p^i) basically p^(-n) = [p^(-1) ]^n so calculate just p^(-1) and caluclate power
// like inversemod(p^(-2)) = p^(-1) * p^(-1)
void init(lli p, lli val)
{
pow_p[0]=1;
p_inv[0]=1;
lli pinv = fastexpo(p,mod-2);
for(lli i=1;i<val;i++)
{
pow_p[i] = modmul(pow_p[i-1],p);
p_inv[i] = modmul(p_inv[i-1],pinv);
}
}
struct Hash{
// 0 based indexing
lli prehash[maxlen];
// hash(s) = sigma(i=0 to n-1) s[i]*p^(i)
// a->1 , b->2 , c->3 and so on
void precomputehash(string &s){ //p can be any prime 19 , 31, 53,107 ...
prehash[0]=(s[0]);
for (lli i=1;i<sz(s);i++) {
prehash[i]= modadd(prehash[i-1] , modmul((s[i]),pow_p[i]));
}
}
// hash[l..r] = ((hash[upto r] - hash[upto (l-1)] ) / P^l) % mod = ((hash[upto r] - hash[upto (l-1)] ) * modinv(P^l) )%mod
lli gethash(lli l, lli r){
if(l==0)
return(prehash[r]%mod);
else{
lli ans = modsub(prehash[r],prehash[l-1]);
ans = modmul(ans, p_inv[l]);
return ans;
}
}
// hash value of all string means hash[0..(n-1)] // 0 based indexing
lli totalhash(string &s){
return(prehash[sz(s)-1]%mod);
}
};
/* -----------------------------------------------------HASHING-------------------------------------------------------------------*/
int main(){
fastio
lli t=1;
//cin>>t;
while(t--) {
lli n,q;
cin>>n>>q;
init(53,n);
string s;
cin>>s;
Hash obj1,obj2;
obj1.precomputehash(s);
string rev = s;
reverse(all(rev));
obj2.precomputehash(rev);
while(q--)
{
lli st , en;
cin>>st>>en;
--st;
--en;
if(obj1.gethash(st,en) == obj2.gethash(n-en-1,n-st-1))
print("yes");
else
print("no");
}
}
return 0;
}