def rec(i,j)
  @m[i][j]=0
  rec(i,j+1) if j<11 and @m[i][j+1]==1
  rec(i,j-1) if j>0 and @m[i][j-1]==1
  rec(i+1,j) if i<11 and @m[i+1][j]==1
  rec(i-1,j) if i>0 and @m[i-1][j]==1
end
loop do
  @m,c,t=[],0,12
  t.times{@m<<gets.split("").map(&:to_i)}
  t.times{|i|
    t.times{|j|
      if @m[i][j]==1
        rec(i,j);c+=1
      end
    }
  }
  p c
  break if !gets
end