, Mathematica , "" .
, :
a = Sqrt[x^2 + y^2] Cos[Arg[x + I y]] + I Sqrt[x^2 + y^2] Sin[Arg[x + I y]];
ComplexExpand@a
Sqrt[x^2 + y^2] Cos[Arg[x + I y]] + I Sqrt[x^2 + y^2] Sin[Arg[x + I y]]
FullSimplify@a
E^(I Arg[x + I y]) Sqrt[x^2 + y^2]
, Mathematica , X Y REALS.
, Mathematica .
:
a = Sqrt[x^2 + y^2] Cos[Arg[x + I y]] + I Sqrt[x^2 + y^2] Sin[Arg[x + I y]];
$Assumptions = Element[x, Reals] && Element[y, Reals]
FullSimplify[a]
x + I y
, $Assumptions
$Assumptions = True
, , Mathematica , ...