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;
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
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.
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
2
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);
Do'stlaringiz bilan baham: |