复系数多项式在高斯坐标系的图形构造

GeoGebra 命令及参数

1. CurveCartesian((V_5 * ((a^(5) * pr(a_5)); (5 * t) + pi(a_5))) + (V_4 * ((a^(4) * pr(a_4)); (4 * t) + pi(a_4))) + (V_3 * ((a^(3) * pr(a_3)); (3 * t) + pi(a_3))) + (V_2 * ((a^(2) * pr(a_2)); (2 * t) + pi(a_2))) + (V_1 * ((a * pr(a_1)); t + pi(a_1))) + (V_0 * (pr(a_0); pi(a_0))), t, 0, (2 * π)) → c
2. Translate(Vector[(V_5 * Vector[Z_5])], (0, 0)) → v_1
3. Translate(Vector[(V_4 * Vector[Z_4])], (V_5 * Z_5)) → v_2
4. Translate(Vector[(V_3 * Vector[Z_3])], (V_5 * Z_5) + (V_4 * Z_4)) → v_3
5. Translate(Vector[(V_2 * Vector[Z_2])], (V_5 * Z_5) + (V_4 * Z_4) + (V_3 * Z_3)) → v_4
6. Translate(Vector[(V_1 * Vector[Z_1])], (V_5 * Z_5) + (V_4 * Z_4) + (V_3 * Z_3) + (V_2 * Z_2)) → v_5
7. Translate(Vector[(V_0 * Vector[Z_0])], (V_5 * Z_5) + (V_4 * Z_4) + (V_3 * Z_3) + (V_2 * Z_2) + (V_1 * Z_1)) → v_6
8. Point(Element[L_{cpx} + (0 * ί), k]) → Li
9. Sequence(Flatten[{xpol(Element[L_{cpx}, j]), ypol(Element[L_{cpx}, j])}], j, 1, Length[L_{cpx}]) → L_{pol}
10. Circle(Element[{(V_0 * Z_0), (V_1 * Z_1), (V_2 * Z_2), (V_3 * Z_3), (V_4 * Z_4), (V_5 * Z_5)}, Max[{(V_5 * 6), (V_4 * 5), (V_3 * 4), (V_2 * 3), (V_1 * 2)}]], Sum[d] - Element[d, Max[{(V_5 * 6), (V_4 * 5), (V_3 * 4), (V_2 * 3), (V_1 * 2)}]]) → q