>>5
d=c(5,-2,-4,7,-1)
#(1)
14+sum(d)

#(2)
cumsum(d)

#(3)
#(x+5*x+sum(cumsum(d)))/6=12
#(6x+18)/6=12
(72-18)/6

# check
c(9,9+cumsum(d)) |> mean()