Solve[Sqrt[a - Sqrt[x + a]] == x, x]