用mathematica7能直接用模和辐角表示复数吗?

问题描述:

用mathematica7能直接用模和辐角表示复数吗?
比如一个复数 1+1i 表示为 Sqrt[2]*∠45`

这么专业的表示肯定不会有的,你可以自己写函数啊
change[x_] :=
ToString[Abs[x]] "*\[Angle]" ToString[N[(180 Arg[x])/\[Pi]]]
"\[Degree]"
change[1 + I]
祝君好运!