FullSimplify[(((q^k - 1)(q(-tq^k + 2q - 2) + t))/(4(q - 1))) + (((q^(k+1) - 2q^k + 1)(t(q^(k+1) - 1) - 2q^2 + 2q))/(4(q - 1)^2))]