#pragma GCC optimize("O3")
#include<bits/stdc++.h>
using namespace std;

char cif[] = {'0','1','2','3','4','5','6','7','8','9','A','B','C','D','E','F'};
string tohex(int x){
    string res;
    res.push_back(cif[x/16]);
    res.push_back(cif[x%16]);
    return res;
}

void message(){
    int r,c;
    cin>>r>>c;
    
    vector<string> ans;
    ans.push_back(tohex(r/10));
    ans.push_back(tohex(r%10));
    ans.push_back(tohex(c/10));
    ans.push_back(tohex(c%10));
    
    for(int i=0;i<r;i++){
        for(int j=0;j<c;j++){
            string s;
            cin>>s;
            if(j%10==0)ans.push_back(s);
        }
    }
    
    cout<<ans.size()<<"\n";
    for(auto i : ans)cout<<i<<" ";
    cout<<"\n";
}

void parts(){
    int m;
    cin>>m;
    
    int r=0,c=0;
    string s;
    cin>>s;
    r+=stoi(s,0,16)*10;
    cin>>s;
    r+=stoi(s,0,16);
    cin>>s;
    c+=stoi(s,0,16)*10;
    cin>>s;
    c+=stoi(s,0,16);
    
    vector mat(r,vector<string>((c+9)/10));
    for(int i=0;i<r;i++){
        for(int j=0;j<(c+9)/10;j++){
            cin>>mat[i][j];
        }
    }
    
    int q;
    cin>>q;
    
    vector<pair<int,int>> ans(q);
    map<string,vector<pair<int,int>>> pos;
    
    for(int id=0;id<q;id++){
        int h,w;
        cin>>h>>w;
        
        vector tmp(h,vector<string>(w));
        for(int j=0;j<h;j++){
            for(int k=0;k<w;k++){
                cin>>tmp[j][k];
            }
        }
        
        for(int col=0;col<w;col++){
            string tmpv;
            for(int i=0;i<h;i++)tmpv+=tmp[i][col];
            
            pos[tmpv].push_back({id,col});
        }
    }
    
    for(int i=0;i<r;i++){
        for(int j=0;j<(c+9)/10;j++){
            string tmp;
            for(int k=0;k<20 && i+k<r;k++){
                tmp+=mat[i+k][j];
                if(tmp.size()>=20){
                    if(pos.find(tmp)!=pos.end()){
                        for(auto [x,y] : pos[tmp]){
                            ans[x]={i+1,j*10+1-y};
                        }
                    }
                }
            }
        }
    }
    
    for(auto [x,y] : ans)cout<<x<<" "<<y<<"\n";
}

int main(){
    ios::sync_with_stdio(false);
    cin.tie(0);
    
    string s;
    cin>>s;
    
    if(s=="message")message();
    else parts();
    
    return 0;
}