n = gets.to_i
m = n ** 2
pp = gets.split.map(&:to_i)

a = Array.new(m + 2 * n, 0)
m.times do |i|
    x, y = i.divmod(n)
    x = n - x - 1 if x > n - x - 1
    y = n - y - 1 if y > n - y - 1
    a[i] = x < y ? x : y
end
b = Array.new(m, 1)

ans = 0
pp.each do |pos|
    pos -= 1
    ans += a[pos]
    b[pos] = 0
    s = a[pos]

    que = [pos]
    while e = que.shift
        s = a[e] + b[e]
        if a[e - n] > s
            a[e - n] = s
            que << e - n
        end

        if a[e - 1] > s
            a[e - 1] = s
            que << e - 1
        end

        if a[e + 1] > s
            a[e + 1] = s
            que << e + 1
        end

        if a[e + n] > s
            a[e + n] = s
            que << e + n
        end
    end
end

p ans
