Maple paketining asosiy maqsadi va


restart; with(geom3d): point(A,7,2,2), point(B,5,7,7), point(C,4,6,10)


Download 0.52 Mb.
bet15/15
Sana16.06.2023
Hajmi0.52 Mb.
#1495897
1   ...   7   8   9   10   11   12   13   14   15
Bog'liq
Maple-dasturida-ishlash

restart;


  • with(geom3d):
  • point(A,7,2,2), point(B,5,7,7), point(C,4,6,10):


    Define the line that asses through two points A and B
      • line(AB,[A,B]);line(AC,[A,C]);line(BC,[B,C]); AB AC BC


      • Equation(AB,t);Equation(AC,t);Equation(BC,t);

    [ 7 K 2 t, 2 C 5 t, 2 C 5 t ] [ 7 K 3 t, 2 C 4 t, 2 C 8 t ] [ 5 K t, 7 K t, 7 C 3 t ]
    AB va AC tomonlar orasidagi burchakni topish;
      • line(AB,[A,B]);line(AC,[A,C]); AB AC


      • FindAngle(AB, AC);



    AD balandlik, kesishish nuqtasi va uning uzunligini topish;
      • with(geom3d):


    Define triangle ABC with vertices A, B and C.
      • triangle(ABC, [point(A,7,2,2),point(B,5,7,7), point(C,4,6,10)]):


    Find the altitude of ABC at A
      • altitude(hA1,A,ABC); hA1


      • form(hA1); lint3d
      • detail(hA1);


    name of the object: hA1 form of the object: line3d
    equation of the line: [_x = 7-10/11*_t, _y = 2+67/11*_t, _z = 2+19/11*_t]
      • altitude(hA1,A,ABC,H); hA1





      • coordinates(H);

    67 , 89 , 41




    11 11 11

      • form(hA1); segment3d
      • detail(hA1);


    name of the object: hA1
    form of the object: segment3d
    the 2 ends of the segment: [[7, 2, 2], [67/11, 89/11, 41/11]]

      • DefinedAs(hA1); [ A, H ]
      • distance(A,H); 15


    11
    ABC ni yuzasini hisoblash.
      • with(geom3d):


    Define triangle ABC with vertices A, B and C
      • triangle(ABC, [point(A,7,2,2),point(B,5,7,7),point(C,4,6,10)]):


    Find the area of ABC
      • area(ABC); 15


    2


      • centroid(G,ABC); G





      • coordinates(G);

    16 , 5, 19



    3 3

    ABC ni qurinsh.
      • with(geom3d):


      • triangle(T1,[point(A,7,2,2),point(B,1,7,3), point(C,4,6,10)]):
      • draw([T1(color=blue)], title=`Screw-dislacement of a triangle`, style=patch);









    Download 0.52 Mb.

    Do'stlaringiz bilan baham:
  • 1   ...   7   8   9   10   11   12   13   14   15




    Ma'lumotlar bazasi mualliflik huquqi bilan himoyalangan ©fayllar.org 2024
    ma'muriyatiga murojaat qiling