n = gets.to_i
m = n ** 2
pp = gets.split.map{|e| e.to_i - 1}

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|
    ans += a[pos]
    b[pos] = 0

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

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

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

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

p ans