Komplekse tall 

 

Komplekse tall 

> restart: interface(imaginaryunit=i):
 

> sqrt(1+i)=KomplekseTall(sqrt(1+i));
 

`*`(`^`(`+`(1, I), `/`(1, 2))) = `+`(`*`(`/`(1, 2), `*`(`^`(`+`(2, `*`(2, `*`(`^`(2, `/`(1, 2))))), `/`(1, 2)))), `*`(`*`(`/`(1, 2), `*`(I)), `*`(`^`(`+`(`-`(2), `*`(2, `*`(`^`(2, `/`(1, 2))))), `/`(1...
 

> z1:=(1+2*i)^2/cos((3-i)):
 

> z1=evalf(KomplekseTall(z1));
 

`/`(`*`(`+`(`-`(3), `*`(4, `*`(I)))), `*`(cos(`+`(3, `-`(I))))) = `+`(2.221891477, `-`(`*`(2.377206604, `*`(I))))
 

> KomplekseTall(z^3=-8)
 

 

[-2., `+`(1., `*`(1.73, `*`(I))), `+`(1., `-`(`*`(1.73, `*`(I))))]
Plot_2d
 

> KomplekseTall(z^6=1+i);
 

 

[`+`(1.05, `*`(.138, `*`(I))), `+`(.405, `*`(.979, `*`(I))), `+`(`-`(.645), `*`(.841, `*`(I))), `+`(`-`(1.05), `-`(`*`(.138, `*`(I)))), `+`(`-`(.405), `-`(`*`(.979, `*`(I)))), `+`(.645, `-`(`*`(.841, ...
[`+`(1.05, `*`(.138, `*`(I))), `+`(.405, `*`(.979, `*`(I))), `+`(`-`(.645), `*`(.841, `*`(I))), `+`(`-`(1.05), `-`(`*`(.138, `*`(I)))), `+`(`-`(.405), `-`(`*`(.979, `*`(I)))), `+`(.645, `-`(`*`(.841, ...
[`+`(1.05, `*`(.138, `*`(I))), `+`(.405, `*`(.979, `*`(I))), `+`(`-`(.645), `*`(.841, `*`(I))), `+`(`-`(1.05), `-`(`*`(.138, `*`(I)))), `+`(`-`(.405), `-`(`*`(.979, `*`(I)))), `+`(.645, `-`(`*`(.841, ...
Plot_2d