n = gets.to_i
map = $stdin.read.lines.map{|s| s.chomp.chars}
map[0].each.with_index do |c,i|
  next unless c == "-"
  map[0][i] = "o"
  map[i][0] = "x"
end

loop do
  rs = map.map.with_index{|r,i| [r, i]}.select{|r,i| r.find{|c| c == "-"}}
  break if rs.size <= 0
  r, i = rs.max_by{|r,i| r.count("o")}
  j = r.map.with_index{|c,j| [c, j]}.select{|c,j| c == "-"}.max_by{|c,j| map[j].count("x")}[1]
  map[i][j] = "x"
  map[j][i] = "o"
end

win = map[0].count("o")
rank = map.map{|r| r.count("o")}.uniq.sort.reverse.index(win) + 1
puts rank