N,M = map(int,input().split())
null = [0]*(M+2)
T = [null]
for _ in range(N):
    sor = list(map(int,input().split()))
    sor = [0] + sor + [0]
    T.append(sor)
T.append(null)
Tszin = []
for i in range(N+2):
    sor = []
    for j in range(M+2):
        sor.append(0)
    Tszin.append(sor)
barlangresz = 0
for i in range(1,N+1):
    for j in range(1,M+1):
        if T[i][j] > 0:
            barlangresz += 1
bejart = 0
first = []
while bejart < barlangresz:
    for i in range(1,N+1):
        for j in range(1,M+1):
            if T[i][j] > 0 and Tszin[i][j]==0:
                sor = [[i,j,T[i][j]]]
                if [i,j,T[i][j]] not in first:
                    first.append([i,j,T[i][j]])
                #print(first)
                Tszin[i][j]=1
                while len(sor) > 0:
                    aktelem = sor.pop()
                    bejart += 1
                    aktmelyseg = aktelem[2]
                    akti = aktelem[0]
                    aktj = aktelem[1]
                    #x = input()
                    
                    if  [akti-1,aktj,T[akti-1][aktj]] in first and first[-1]!=[akti-1,aktj,T[akti-1][aktj]]:
                        #print(first[-1],[akti-1,aktj,T[akti-1][aktj]])
                        first.pop(first.index([akti-1,aktj,T[akti-1][aktj]]))
                    if T[akti-1][aktj]>=aktmelyseg and Tszin[akti-1][aktj]==0:
                        sor.append([akti-1,aktj,T[akti-1][aktj]])
                        Tszin[akti-1][aktj] = 1

                    if  [akti+1,aktj,T[akti+1][aktj]] in first and first[-1]!=[akti+1,aktj,T[akti+1][aktj]]:
                        #print(first[-1],[akti+1,aktj,T[akti+1][aktj]])
                        first.pop(first.index([akti+1,aktj,T[akti+1][aktj]]))
                    if T[akti+1][aktj]>=aktmelyseg and Tszin[akti+1][aktj]==0:
                        sor.append([akti+1,aktj,T[akti+1][aktj]])
                        Tszin[akti+1][aktj] = 1

                    if  [akti,aktj-1,T[akti][aktj-1]] in first and first[-1]!=[akti,aktj-1,T[akti][aktj-1]]:
                        #print(first[-1],[akti,aktj-1,T[akti][aktj-1]])
                        first.pop(first.index([akti,aktj-1,T[akti][aktj-1]]))
                    if T[akti][aktj-1]>=aktmelyseg and Tszin[akti][aktj-1]==0:
                        sor.append([akti,aktj-1,T[akti][aktj-1]])
                        Tszin[akti][aktj-1] = 1

                    if  [akti,aktj+1,T[akti][aktj+1]] in first and first[-1]!=[akti,aktj+1,T[akti][aktj+1]]:
                        #print(first[-1],[akti,aktj+1,T[akti][aktj+1]])
                        first.pop(first.index([akti,aktj+1,T[akti][aktj+1]]))
                    if T[akti][aktj+1]>=aktmelyseg and Tszin[akti][aktj+1]==0:
                        sor.append([akti,aktj+1,T[akti][aktj+1]])
                        Tszin[akti][aktj+1] = 1

print(len(first))
for k in first:
    print(k[0],k[1])