//#pragma GCC optimize("Ofast,unroll-loops,no-stack-protector")
//#pragma GCC target("sse,sse2,sse3,ssse3,sse4,popcnt,abm,mmx,avx,tune=native")
#include <bits/stdc++.h>
using namespace std;
#define debug(s) cout<< #s <<" = "<< s <<endl
#define all(v) (v).begin(), (v).end()
#define KeepUnique(v) (v).erase( unique(all(v)), v.end() )
#define MEMSET(a,val) memset(a, val, sizeof a)
#define PB push_back
#define endl '\n'
typedef long long ll;
inline int myrand(int l, int r) {
int ret = rand(); ret <<= 15; ret ^= rand();
if(ret < 0) ret = -ret; ret %= (r-l+1); ret += l;
return ret;
}
template <typename F, typename S>
ostream& operator << (ostream& os, const pair< F, S>& p) {
return os<<"(" <<p.first<<", "<<p.second<<")"; }
typedef pair<int, int> ii;
template<typename T> using min_pq =
priority_queue<T, vector<T>, greater<T> >;
//int dx[] = {-1, +0, +1, +0};
//int dy[] = {+0, +1, +0, -1};
int n, m;
vector<string> ok, rev;
vector<int> v;
bool IsPrefix(string &s, string &pre) {
if(pre.size() > s.size()) return false;
for(int i = 0; i < pre.size(); i++) {
if(pre[i] != s[i]) return false;
} return true;
}
int32_t main () {
// freopen("in", "r", stdin);
cin >> n >> m;
ok.resize(n), rev.resize(n);
for(string &b : ok) cin >> b;
sort(all(ok));
for(int i = 0; i < n; i++) {
rev[i] = ok[i];
reverse(all(rev[i]));
v.push_back(i);
}
sort(all(v), [](int x, int y){return rev[x] < rev[y];});
sort(all(rev));
// for(int i = 0; i < n; i++) cout << ok[i] << ' '; cout << endl;
// for(int i = 0; i < n; i++) cout << rev[i] << ' '; cout << endl;
// for(int i = 0; i < n; i++) cout << v[i] << ' '; cout << endl;
while(m--) {
int lo, hi;
string pre, suf;
cin >> pre >> suf;
reverse(all(suf));
int l = lower_bound(all(ok), pre) - ok.begin(), r;
if(l >= ok.size() or !IsPrefix(ok[l], pre)) r = l - 1;
else {
lo = l, hi = ok.size() - 1;
while(lo <= hi) {
int mid = lo + hi >> 1;
if(IsPrefix(ok[mid], pre)) {
lo = mid + 1;
r = mid;
} else {
hi = mid - 1;
}
}
}
int lit = lower_bound(all(rev), suf) - rev.begin(), rit;
if(lit >= ok.size() or !IsPrefix(rev[lit], suf)) rit = lit - 1;
else {
lo = lit, hi = rev.size() - 1;
while(lo <= hi) {
int mid = lo + hi >> 1;
if(IsPrefix(rev[mid], suf)) {
lo = mid + 1;
rit = mid;
} else {
hi = mid - 1;
}
}
}
// cout << "l = " << l << ", r = " << r << ", lit = " << lit << ", rit = " << rit << endl;
int ret = 0;
for(int i = lit; i <= rit; i++) {
if(l <= v[i] and v[i] <= r)
ret++;
} cout << ret << endl;
}
}
