复数的n次方根 by Chris Mizell

GeoGebra 命令及参数

1. Textfield(a) → inputBox1
2. Textfield(b) → inputBox2
3. If(a ≥ 0 ∧ b ≥ 0, atan(b / a), If[a < 0, atan(b / a) + π, atan(b / a) + (2 * π)]) → α
4. Sequence((abs(z_1) * (cos(β + ((j * 360) * ° / k)) + (ί * sin(β + ((j * 360) * ° / k))))), j, 1, k) → list2
5. Circle((0, 0), z_1) → c
6. Intersect(xAxis, yAxis) → B
7. Segment(list1, B) → d
8. Segment(B, A) → e
9. Sequence(Segment[(0, 0), (abs(z_1) * (cos(β + ((j * 360) * ° / k)) + (ί * sin(β + ((j * 360) * ° / k)))))], j, 1, k) → list3
10. Textfield(a) → InputBox1
11. Textfield(b) → InputBox2