-- min [ (500/x)^2 + 1000x + x^2 ] ~= 10000 at x ~= 8 local mesh = 8 local boxnum = 125 --math.floor(1001 / mesh) local s_lowlim = 400 -- x^2 < (x/8)^2 + 16x + 64 where x ~=< 20 local ior = io.input() local n, k = ior:read("*n", "*n") local enm_x, enm_y, enm_h = {}, {}, {} local ex, ey = 0, 0 for i = 1, n do ex, ey, enm_h[i] = ior:read("*n", "*n", "*n") enm_x[i], enm_y[i] = ex + 500, ey + 500 end local boxval = {} local pixval = {} for i = 1, boxnum * boxnum do boxval[i] = 0 end for i = 1, 1001 * 1001 do pixval[i] = 0 end for i = 1, k do local ax, ay, aw, ah, ad = ior:read("*n", "*n", "*n", "*n", "*n") local axleft, ayleft = ax + 500, ay + 500 local axright, ayright = math.min(axleft + aw, 1000), math.min(ayleft + ah, 1000) if((aw + 1) * (ah + 1) <= s_lowlim) then for i_x = axleft, axright do for i_y = ayleft, ayright do local idx = i_y * 1001 + i_x + 1 pixval[idx] = pixval[idx] + ad end end else local boxxleft, boxyleft = math.floor(axleft / mesh), math.floor(ayleft / mesh) if(axleft % mesh ~= 0) then boxxleft = boxxleft + 1 end if(ayleft % mesh ~= 0) then boxyleft = boxyleft + 1 end local boxxright, boxyright = math.floor(axright / mesh), math.floor(ayright / mesh) if(axright % mesh ~= mesh - 1) then boxxright = boxxright - 1 end if(ayright % mesh ~= mesh - 1) then boxyright = boxyright - 1 end local boxxleftpx, boxyleftpx = boxxleft * mesh, boxyleft * mesh local boxxrightpx, boxyrightpx = boxxright * mesh - 1, boxyright * mesh - 1 local leftedge = math.min(axright, boxxleftpx - 1) local rightedge = math.max(leftedge + 1, boxxrightpx + 1) -- left for i_x = axleft, leftedge do for i_y = ayleft, ayright do local idx = i_y * 1001 + i_x + 1 pixval[idx] = pixval[idx] + ad end end -- right for i_x = rightedge, axright do for i_y = ayleft, ayright do local idx = i_y * 1001 + i_x + 1 pixval[idx] = pixval[idx] + ad end end if(boxxleft <= boxxright) then local yleftedge = math.min(ayright, boxyleftpx - 1) local yrightedge = math.max(yleftedge + 1, boxyrightpx + 1) -- center bottom(yleft) for i_x = leftedge + 1, rightedge - 1 do for i_y = ayleft, yleftedge do local idx = i_y * 1001 + i_x + 1 pixval[idx] = pixval[idx] + ad end end -- center top(yright) for i_x = leftedge + 1, rightedge - 1 do for i_y = yrightedge, ayright do local idx = i_y * 1001 + i_x + 1 pixval[idx] = pixval[idx] + ad end end -- center BOX if(boxyleft <= boxyright) then for i_bx = boxxleft, boxxright do for i_by = boxyleft, boxyright do local idx = i_by * boxnum + i_bx + 1 boxval[idx] = boxval[idx] + ad end end end end end end local enmhp = 0 for i = 1, n do ex, ey = enm_x[i], enm_y[i] local ebx, eby = math.floor(ex / mesh), math.floor(ey / mesh) local idx, b_idx = ey * 1001 + ex + 1, eby * boxnum + ebx + 1 enmhp = enmhp + math.max(0, enm_h[i] - pixval[idx] - boxval[b_idx]) end print(enmhp)