local n, m = io.read("*n", "*n")
local ans = 0LL
local a = {}
for i = 1, m do
  a[i] = io.read("*n")
  ans = ans + 1LL * a[i] * a[i]
end
local q = io.read("*n")
for iq = 1, q do
  local c, k, d = io.read("*n", "*n", "*n")
  ans = ans - 1LL * a[c] * a[c]
  a[c] = a[c] - k
  ans = ans + 1LL * a[c] * a[c]
  ans = ans - 1LL * a[d] * a[d]
  a[d] = a[d] + k
  ans = ans + 1LL * a[d] * a[d]
  local str = tostring(ans):gsub("LL", "")
  print(str)
end