AtCoder ABC #109 D

abc109-d.rb

h, w = gets.chomp.split(" ").map(&:to_i)
a = []
h.times do
  a << gets.chomp.split(" ").map(&:to_i)
end

ans = []
h.times do |i|
  w.times do |j|
    if (a[i][j]).odd?
      if j < w - 1
        a[i][j] -= 1
        a[i][j+1] += 1
        ans << [i+1, j+1, i+1, j+2]
      else
        if i < h - 1
          a[i][j] -= 1
          a[i+1][j] += 1
          ans << [i+1, j+1, i+2, j+1]
        end
      end
    end
  end
end

puts ans.length
ans.each{|line| puts line.join(" ")}