1、解方程行不通:Solve[x x\[Conjugate] == 1, x]不过,Mathematica在后面提示了一种可行的方法:解集包含一个完全维度的分量;请使用 Reduce 获取全部解的信息.

3、检验,单位圆上的点满足要求:X = E^(I x);Refine[FullSimplify[X X\[Conjugate] == 1], x \[Element] Reals]

5、寻求更一般问题的答案:Reduce[x*x\[Conjugate] == a, x]结果是:当a=0时,x=0;当a≠0时,a>0,且x是复平面上半径为根号a、圆心位于原点的圆上的点。
