相似性求梯形面积

GeoGebra 命令及参数

1. Point(Ray[A, A + (1, 0)]) → D
2. Point(Segment[B, B + (Distance[A, D], 0)]) → C
3. Polygon(A, B, C, D) → poly1, a, b, c, d
4. Line(A, B) → f
5. Line(D, C) → g
6. Intersect(f, g) → E
7. Segment((x(E), y(A)), (x(E), y(B))) → h_2
8. Segment(E, (x(E), y(B))) → h_1
9. Polygon(B, E, C) → poly2, c_1, b_1, e_1