#include <bits/stdc++.h>
using namespace std;
#define FOR(i,a,b) for(int i=(a);i<(b);++i)
#define rep(i,n)   FOR(i,0,n)
#define pb emplace_back
typedef long long ll;
typedef pair<int,int> pint;

unsigned long xor128(){
    static unsigned long x=123456789,y=362436069,z=521288629,w=88675123;
    unsigned long t=(x^(x<<11));
    x=y;y=z;z=w;
    return (w=(w^(w>>19))^(t^(t>>8)));
}
double timeLimit=0.90;
const int64_t CYCLES_PER_SEC=2800000000;
struct Timer {
	int64_t start;
	Timer() { reset(); }
	void reset() { start = getCycle(); }
	void plus(double a) { start -= (a * CYCLES_PER_SEC); }
	inline double get() { return (double)(getCycle() - start) / CYCLES_PER_SEC; }
	inline int64_t getCycle() {
		uint32_t low, high;
		__asm__ volatile ("rdtsc" : "=a" (low), "=d" (high));
		return ((int64_t)low) | ((int64_t)high << 32);
	}
};
const int dx[]={-1,0,1,0},dy[]={0,-1,0,1};
int n,k,W0;
pint L[501];
string s[61];
bool g[61][61],tg[61][61];
vector<pair<pint,pint> > cand(7201);
vector<pair<pint,pint> > ans,tmp;
pair<pint,pint> calc(int length,int id){
    pair<pint,pint> ret;
    bool flag=true;
    pint best={-1000100010,0};
    int lx,rx,ly,ry;
    rep(i,n)rep(j,n-length+1)if(g[i][j]|g[i][j+length-1]){
        pint score={0,0};
        int slide=1;
        while(j-slide>=0&&g[i][j-slide]!=g[i][j]&&slide<3) ++score.second,++slide;
        slide=length;
        while(j+slide<n&&g[i][j+slide]!=g[i][j+length-1]&&slide<2+length) ++score.second,++slide;
        rep(k,length){
            if(flag){
                if(g[i][j+k]==1) ++score.first;
                else --score.first;
            }
            if(k>0&&g[i][j+k-1]==g[i][j+k]) ++score.second;
            slide=1;
            while(i-slide>=0&&g[i][j+k]!=g[i-slide][j+k]&&slide<3) ++score.second,++slide;
            slide=1;
            while(i+slide<n&&g[i][j+k]!=g[i+slide][j+k]&&slide<3) ++score.second,++slide;
        }
        if(best<score){
            ret=make_pair(pint(i+1,j+1),pint(i+1,j+length));
            best=score;
        }
    }
    
    rep(i,n)rep(j,n-length+1)if(g[j][i]|g[j+length-1][i]){
        pint score={0,0};
        int slide=1;
        while(j-slide>=0&&g[j-slide][i]!=g[j][i]&&slide<3) ++score.second,++slide;
        slide=length;
        while(j+slide<n&&g[j+slide][i]!=g[j+length-1][i]&&slide<2+length) ++score.second,++slide;
        rep(k,length){
            if(flag){
                if(g[j+k][i]==1) ++score.first;
                else --score.first;
            }
            if(k>0&&g[j+k-1][i]==g[j+k][i]) ++score.second;
            slide=1;
            while(i-slide>=0&&g[j+k][i]!=g[j+k][i-slide]&&slide<3) ++score.second,++slide;
            slide=1;
            while(i+slide<n&&g[j+k][i]!=g[j+k][i+slide]&&slide<3) ++score.second,++slide;
        }
        if(best<score){
            ret=make_pair(pint(j+1,i+1),pint(j+length,i+1));
            best=score;
        }
    }
    ly=ret.first.first,lx=ret.first.second,ry=ret.second.first,rx=ret.second.second;
    FOR(i,ly,ry+1)FOR(j,lx,rx+1) g[i-1][j-1]^=1;
    return ret;
}
pair<pint,pint> calc2(pair<pint,pint> tget){
    pair<pint,pint> ret;
    bool flag=true;
    pint best={-1000100010,0};
    int lx,rx,ly,ry;
    ly=tget.first.first,lx=tget.first.second,ry=tget.second.first,rx=tget.second.second;
    FOR(i,ly,ry+1)FOR(j,lx,rx+1) g[i-1][j-1]^=1;
    int length=(ry-ly)==0?rx-lx+1:ry-ly+1;
    rep(i,n)rep(j,n-length+1)if(g[i][j]|g[i][j+length-1]){
        pint score={0,0};
        int slide=1;
        while(j-slide>=0&&g[i][j-slide]!=g[i][j]) ++score.second,++slide;
        slide=length;
        while(j+slide<n&&g[i][j+slide]!=g[i][j+length-1]) ++score.second,++slide;
        rep(k,length){
            if(flag){
                if(g[i][j+k]==1) ++score.first;
                else --score.first;
            }
            if(k>0&&g[i][j+k-1]==g[i][j+k]) ++score.second;
            
        }
        if(best<score){
            ret=make_pair(pint(i+1,j+1),pint(i+1,j+length));
            best=score;
        }
    }
    
    rep(i,n)rep(j,n-length+1)if(g[j][i]|g[j+length-1][i]){
        pint score={0,0};
        int slide=1;
        while(j-slide>=0&&g[j-slide][i]!=g[j][i]) ++score.second,++slide;
        slide=length;
        while(j+slide<n&&g[j+slide][i]!=g[j+length-1][i]) ++score.second,++slide;
        rep(k,length){
            if(flag){
                if(g[j+k][i]==1) ++score.first;
                else --score.first;
            }
            if(k>0&&g[j+k-1][i]==g[j+k][i]) ++score.second;
            
        }
        if(best<score){
            ret=make_pair(pint(j+1,i+1),pint(j+length,i+1));
            best=score;
        }
    }
    ly=ret.first.first,lx=ret.first.second,ry=ret.second.first,rx=ret.second.second;
    FOR(i,ly,ry+1)FOR(j,lx,rx+1) g[i-1][j-1]^=1;
    return ret;
}
int get_score(){
    int ret=0;
    rep(i,n)ret+=count(g[i],g[i]+n,0);
    return ret;
}
int main(){
    Timer timer;
    timer.reset();
    cin>>n>>k;
    int Li;
    rep(i,k){
        cin>>Li;
        L[i]={Li,i};
    }
    //sort(L,L+k,greater<pint>());
    rep(i,n) cin>>s[i];
    ans.resize(k);
    rep(i,n)rep(j,n){
        g[i][j]=s[i][j]-'0';
    }
    //tg=g;
    int bestscore=-1000100010;
    pair<pint,pint> ret;
    rep(i,k){
        int id=L[i].second;
        ret=calc(L[i].first,id);
        ans[id]=ret;
    }
    memcpy(tg,g,sizeof(g));
    while(timer.get()<timeLimit){
        int id=xor128()%k;
        ans[id]=calc2(ans[id]);
    }
    rep(i,k){
        cout<<ans[i].first.first<<" "<<ans[i].first.second<<" "<<ans[i].second.first<<" "<<ans[i].second.second<<endl;
    }
    return 0;
}