
def sinkIsland(x, y, islandmap)
  sunk = false
  if ((x < islandmap[0].size && y < islandmap.size) && islandmap[x][y] == 1) then
    islandmap[x][y] = 0
    sunk = true  
    #右チェック
    sinkIsland(x + 1, y, islandmap) if x + 1 < islandmap[0].size
    #左チェック
    sinkIsland(x - 1, y, islandmap) if 0 <= x - 1 
    #下チェック
    sinkIsland(x, y + 1, islandmap) if y + 1 < islandmap.size
    #上チェック
    sinkIsland(x, y - 1, islandmap) if 0 <= y - 1
  end
  return sunk
end

loop do
  islandmap = Array.new
  12.times{
    islandmap << $stdin.gets.chomp.split("").map{|m| m.to_i}
  }
  numIsland = 0
  islandmap.size.times{|y|
    islandmap[0].size.times{|x|
      numIsland += 1 if sinkIsland(x, y, islandmap)
      }
  }
  
  p numIsland
  
  break if $stdin.gets == nil
end