Solve[A == (B/A + 2B/(A + C/2) + (A^2 + 3)/C)/(C^2 + 7A), A]