Area and Perimeter

Author:
CDOMA7

多謝舊同事德哥的工作紙。

Handout (Draft)

Execute({ "ChangeSize=Checkbox( )", "A=Intersect(xAxis, yAxis)", "B=Point(xAxis)", "SetValue(B, (80,0))", "SetConditionToShowObject(B, ChangeSize)", "D=Point(yAxis)", "SetValue(D, (0,120))", "SetConditionToShowObject(D, ChangeSize)", "C=(x(B), y(D))", "AB=Segment(A, B)", "BC=Segment(B,C)", "CD=Segment(C, D)", "DA=Segment(D, A)", "E=Point(AB)", "SetValue(E, (30,0))", "SetConditionToShowObject(E, ChangeSize)", "F=Point(AB)", "SetValue(F, (50,0))", "SetConditionToShowObject(F, ChangeSize)", "G=Point(BC)", "SetValue(G, (80,40))", "SetConditionToShowObject(G, ChangeSize)", "H=Point(CD)", "SetValue(H, (20,120))", "SetConditionToShowObject(H, ChangeSize)", "RTriangle_H=Polygon(B, G, F)", "I=E+G-F", "Parallelogram_G=Polygon(E,F,G,I)", "J=Intersect(PerpendicularLine(I,CD), CD)", "Rectangle_D=Polygon(G, C, J, I)", "Square_B=Polygon(J, H, 4)", "M=Intersect(DA, Line(K, L))", "Rectangle_A=Polygon(D, M, K, H)", "N=Point(Segment(I, L))", "SetValue(N, (60,50))", "SetConditionToShowObject(N, ChangeSize)", "O=Intersect(PerpendicularLine(N,DA), DA)", "Rectangle_C=Polygon(M, O, N, L)", "P=Intersect(PerpendicularLine(E,Segment(N,O)), Segment(N,O))", "Rectangle_E=Polygon(A, E, P, O)", "Trapezoid_F=Polygon(E, I, N, P)", "EI=Segment(E, I)", "FG=Segment(F,G)", "P_A=Perimeter(Rectangle_A)", "P_B=Perimeter(Square_B)", "P_C=Perimeter(Rectangle_C)", "P_D=Perimeter(Rectangle_D)", "P_E=Perimeter(Rectangle_E)", "P_F=Perimeter(Trapezoid_F)", "P_G=Perimeter(Parallelogram_G)", "P_H=Perimeter(RTriangle_H)", "ShowAxes(false)"}) (Draft) A=Intersect(xAxis, yAxis), B=Point(xAxis), D=Point(yAxis) C=(x(B), y(D)) or C=B+D-A AB=Segment(A, B), BC, CD, DA E=Point(AB), F=Point(AB), G=Point(BC), H=Point(CD) RTriangle_H=Polygon(B, G, F) I=Intersect(Line(E, Line(F,G)), Line(G, Line(E,F))) or I=E+G-F Parallelogram_G=Polygon(E,F,G,I) J=Intersect(PerpendicularLine(I, CD), CD) or J=(x(I),y(D)) Rectangle_D=Polygon(G, C, J, I) Square_B=Polygon(J, H, 4) or **H=Point(Segment(J,D)) M=Intersect(DA, Line(K, L)) Rectangle_A=Polygon(D, M, K, H) N=Point(Segment(I, L)) O=Intersect(PerpendicularLine(N, DA), DA) Rectangle_C=Polygon(M, O, N, L) P=Intersect(PerpendicularLine(E, Segment(N,O)), Segment(N,O)) Rectangle_E=Polygon(A, E, P, O) Trapezoid_F=Polygon(E, I, N, P) EI=Segment(E, I) / FG=Segment(F, G) ChangeSize=true B,D,E,F,G,H,N Perimeter(Rectangle_A) Perimeter(Square_B) Perimeter(Rectangle_C) Perimeter(Rectangle_D) Perimeter(Rectangle_E) Perimeter(Trapezoid_F) Perimeter(Parallelogram_G) Perimeter(RTriangle_H) Qu=Text("測量員新丁只記錄一塊土地的一些資料,你能幫他完成下表嗎?", D+(0,5)) Table \; (Ans): \\ \fbox{ \begin{array}{} & A & B & C & D & E & F & G & H \\ Area: &\red{ } & & & & & & & \\ Perimeter: & &\red{ } &\red{ } & & & & & \\ \end{array} }

Student Work