Я тут сейчас, задействовав исключительно, сами понимаете, спинной мозг, запряг комп, так он мне говорит, что есть ещё один корень, подозрительно смахивающий на золотое сечение, а два других корня являются решениями уравнения шестой степени и в радикалах выражаться не хотят, как их вишнёвым вареньем и креветками не корми.
Код:
In := Solve[x^3 + 1 == 2 Power[2 x - 1, (3)^-1], x] // FullSimplify
Out = {{x -> 1}, {x -> 1/2 (-1 + Sqrt[5])}, {x -> Root[9 + 2 #1 + 4 #1^2 + 2 #1^3 + 2 #1^4 + #1^6 &, 1]}, {x -> Root[9 + 2 #1 + 4 #1^2 + 2 #1^3 + 2 #1^4 + #1^6 &, 2]}}