//https://contest.ucup.ac/contest/1821/problem/9536?v=1
//f[i][x][y][p] : 考虑前i个字符，使用j个a，k个b，并且最后一个字符是p
#include<bits/stdc++.h>
using namespace std;
#define ll long long
const ll maxn = 305;
ll n , q;
string c, s;
ll f[maxn][maxn][maxn][3];
ll g[maxn][maxn][maxn];
ll cnt[3];
const ll mod = 1e9 + 7;
signed main(){
    cin >> n >> q;
    cin >> c;
    s = "0";
    s += c;

    for(ll i = 1 ; i <= n;i++){
        if(s[i]!='?')cnt[ (ll)(s[i] - 'a') ]++; 
    }


    if(s[1] == '?'){
        f[1][2][1][0] = 1;
        f[1][1][2][1] = 1;
        f[1][1][1][2] = 1;

    }
    else{
        if(s[1] == 'a')f[1][2][1][0] = 1;
        if(s[1] == 'b')f[1][1][2][1] = 1;
        if(s[1] == 'c')f[1][1][1][2] = 1;
    }

    for(ll i = 2; i <= n ;i ++){
        for(ll x = 1 ; x <= i + 1 ; x++){
            for(ll y = 1 ; x + y <= i + 2; y++ ){
                // cout <<  "fdassdas" << endl;
                ll z = i + 3 - x - y;

                if(s[i] != '?'){
                    if(s[i] == 'a' && x >= 1){
                        //f[1][2][1][0]
                        f[i][x][y][0] = ( f[i - 1][x - 1][y][1] + f[i - 1][x - 1][y][2]) % mod ;
                    }
                    else if ( s[i] == 'b' && y >= 1 ){
                        f[i][x][y][1] = (f[i - 1][x][y - 1][0] + f[i - 1][x][y - 1][2])% mod ;
                    }
                    else if ( s[i] == 'c' && z >= 1 ){
                        f[i][x][y][2] = (f[i - 1][x][y][0] + f[i - 1][x][y][1] ) % mod;
                    }
                }
                else{
                    if(s[i - 1] != 'a' && x >= 1  ){//can select a
                        f[i][x][y][0] = (  f[i - 1][x - 1][y][1] + f[i - 1][x - 1][y][2]) % mod;
                    }
                    if(s[i - 1] != 'b' && y >= 1){//can select b
                        f[i][x][y][1] = (f[i - 1][x][y - 1][0]  + f[i - 1][x][y - 1][2]) % mod;
                    }
                    if(s[i - 1] != 'c' && z >= 1){//can select c
                        f[i][x][y][2] = (f[i - 1][x][y][0] + f[i - 1][x][y][1] ) % mod;
                    }
                }


            }
        }
    }


    // cout << f[6][3][3][2] << endl;
    for(ll x = 1 ; x <= n + 1; x++){
        for(ll y = 1 ;y <= n + 1; y++){
            for(ll z = 1 ; z <= n + 1 ; z++){

                ll res = 0;
                for(ll  i = 0 ; i <= 2 ; i++){
                    res = ( res + f[n][x][y][i])% mod;
                }
                // cout << res << endl;

                g[x][y][z] = (g[x-1][y][z] + g[x][y-1][z] + g[x][y][z-1] - g[x-1][y-1][z]-g[x-1][y][z-1]-g[x][y-1][z-1] + g[x-1][y-1][z-1] )%mod;
                if(x + y + z == n + 3){
                    g[x][y][z] = (g[x][y][z] + res) % mod;
                }
                // cout << g[x][y][z] << endl;
            }



        }
    }

    while(q--){
        ll x,y,z;
        cin >> x >> y >> z;
        cout << g[x + 1 + cnt[0] ][y + 1 + cnt[1] ][z + 1 + cnt[2] ]<< endl;
    }

    return 0;
}