Resultado de bucles anidados

Realmente no sé cómo averiguar el resultado de los bucles anidados. Por ejemplo, en el siguiente pseudocódigo, no puedo resolver lo que se dará al final de la ejecución. Me alegraría mucho si alguien me da una solución simple.

r <- 0
for i <- 1 to n do 
  for j <- 1 to i do
    for k <- j to i+j do
      r <- r + 1
return r

La pregunta es

¿Cuál es el resultado del código y dar el resultador en términos den?

Lo escribo pero cada vez que me confundo.

Respuestas a la pregunta(3)

Su respuesta a la pregunta