#include <fstream>
using namespace std;
char a[101][101],v[51],poz[51][3];
int main()
{
    ifstream in("cuvinte.in");
    ofstream out("cuvinte.out");
    int n,m,p,j,gasit=0,nrapar=0,i,linie,coloana,l,c,po;
    in>>n>>m>>p;
    for (i=1;i<=p;i++)
    in>>v[i];

    for (i=1;i<=n;i++)
    {
        for(j=1;j<=m;j++)
        {
            in>>a[i][j]; //out<<a[i][j]<<" ";
        }
       // out<<endl;
    }//cautam prima litera a cuvantului in matrice
    linie=1;coloana=1;
    do{
    po=1;gasit=0;
    for(i=linie;i<=n;i++){
    for(j=coloana;j<=m;j++)
    if(a[i][j]==v[po]){
        l=i;out<<i<<" ";
        c=j;out<<j<<" "<<endl;
        gasit=1;
        poz[po][1]=l;
        poz[po][2]=c;
        if (j==n)
        {
            linie=i+1;coloana=1;
        }
        else
        {
            linie=i;coloana=j+1;
        }
        break;
    }
    if (gasit==1)break;}
    gasit=1;
    po++;out<<l<<" "<<c<<endl;
    while (po<p && gasit==1){
          if (a[l-1][c]==v[po])
      {
            l=l-1;c=c;out<<l<<" "<<c<<endl;
            poz[po][1]=l;
            poz[po][2]=c;
      }
      else if (a[l+1][c]==v[po])
      {
            l=l+1;out<<l<<" "<<c<<endl;
            poz[po][1]=l;
            poz[po][2]=c;
      }
      else if (a[l][c-1]==v[po])
      {
            c=c-1;out<<l<<" "<<c<<endl;
            poz[po][1]=l;
            poz[po][2]=c;
      }
      else if (a[l][c+1]==v[po])
      {
          c=c+1;out<<l<<" "<<c<<endl;
          poz[po][1]=l;
          poz[po][2]=c;
      }
      else gasit=0;
      po++;
    }
    if(gasit==1)nrapar++;
   }
   while(linie<=n && coloana<=m);
   out<<nrapar<<endl;
 if(nrapar==1)
    for(i=1;i<=p;i++)
     out<<poz[i][1]<<" "<<poz[i][2]<<endl;
   return 0;
}