#include #include #define SELECTER(_1,_2,_3,SELECT,...) SELECT #define rep1(i,n) for(int i=0;i<(int)n;++i) #define rep2(i,a,n) for(int i=(int)a;i<(int)n;++i) #define rep(...) SELECTER(__VA_ARGS__,rep2,rep1)(__VA_ARGS__) #define RSELECTER(_1, _2, _3, RSELECT, ...) RSELECT #define rrep1(i,n) for(int i=(int)(n)-1;i>=0;--i) #define rrep2(i,a,n) for(int i=(int)(n)-1;i>=(int)a;--i) #define rrep(...) RSELECTER(__VA_ARGS__, rrep2, rrep1)(__VA_ARGS__) #define all(a) a.begin(),a.end() #define rall(a) a.rbegin(),a.rend() #define fi first #define se second #define PrintR LogOutput #ifdef _DEBUG #define Log(...) LogOutput(__VA_ARGS__) #else #define Log(...) #endif using namespace std; using namespace atcoder; using ll=long long; using ld=long double; using pii=pair; using pll=pair; using pdd=pair; using tp=tuple; using tpll=tuple; using veci=vector; using vecpii=vector>; using vecll=vector; using vecpll=vector>; using vecpdd=vector>; using vecs=vector; using vecb=vector; using vecd=vector; using vectp=vector; using vectpll=vector; using mint=modint998244353; using mint10=modint1000000007; template istream& operator>>(istream& in, pair& a){return in >> a.first >> a.second;} template ostream& operator<<(ostream& out, const pair& a){return out << a.first << ' ' << a.second;} ostream& operator<<(ostream& out, const mint& a){return out << a.val();} ostream& operator<<(ostream& out, const mint10& a){return out << a.val();} ostream& operator<<(ostream& out, const modint& a){return out << a.val();} template ostream& operator<<(ostream& out, const vector& d){for(int i = 0 ; i < d.size() ; ++i) out << d[i] << (i == d.size() - 1 ? "" : " "); return out;} template pair operator+(const pair& a, const pair& b){return {a.fi + b.fi, a.se + b.se};} template pair operator-(const pair& a, const pair& b){return {a.fi - b.fi, a.se - b.se};} template inline bool chmax(T& a,T b){if(a inline bool chmin(T& a,T b){if(a>b) {a=b;return true;} return false;} bool Judge(int i, int j, int h, int w){return i < 0 || j < 0 || i >= h || j >= w;} bool PrintA(int i){cout<<(i ? "Yes" : "No")<::max() / 4; constexpr int inf=numeric_limits::max() / 2; constexpr ll MOD=998244353; const int vi[] = {0, 1, 0, -1}, vj[] = {1, 0, -1, 0}; template void LogOutput(Args&&... args){ stringstream ss; ((ss << args << ' '), ...); cout << ss.str().substr(0, ss.str().length() - 1) << endl; } template void LogOutput(vector>& data){for(auto d : data) LogOutput(d);} int main(){ ios::sync_with_stdio(false); std::cin.tie(nullptr); int m;cin>>m; modint::set_mod(m); int n = 28, hn = n / 2; vecll a(n), b(n); rep(i, n) cin>>a[i]; rep(i, n) cin>>b[i]; vector> mpa(hn + 1), mpb(hn + 1); rep(i, 1 << hn){ int cnt = __builtin_popcount(i); modint s = 0; rep(j, hn){ if(i >> j & 1) s += a[j]; else s += b[j]; } mpa[cnt][s.val()]++; } rep(i, 1 << hn){ int cnt = __builtin_popcount(i); modint s = 0; rep(j, hn){ if(i >> j & 1) s += a[j + hn]; else s += b[j + hn]; } mpb[cnt][s.val()]++; } rep(i, hn + 1){ ll s = 0; map nmp; for(auto& [l, r] : mpb[i]){ s += r; nmp[l] = s; } swap(mpb[i], nmp); } int q;cin>>q; while(q--){ int k, x;cin>>k>>x; ll ans = 0; rep(i, min(hn, k) + 1){ for(auto& [l, r] : mpa[i]) if(k - i <= hn && mpb[k - i].size()){ if(l <= x){ auto it = mpb[k - i].lower_bound(x - l); auto it2 = mpb[k - i].lower_bound(m - l); if(it2 == mpb[k - i].begin() || it == it2) continue; it2--; ll s = 0; if(it != mpb[k - i].begin()){ it--; s = it->se; } ans += r * (it2->se - s); }else{ auto it = mpb[k - i].lower_bound(m - l); auto it2 = mpb[k - i].lower_bound(m - l + x); if(it != mpb[k - i].begin()){ it--; if(it == it2){ ans += r * mpb[k - i].rbegin()->se; continue; } ans += r * it->se; } ll s = 0; if(it2 != mpb[k - i].begin()){ it2--; s = it2->se; } ans += r * (mpb[k - i].rbegin()->se - s); } } } cout<