dsegment(OM1,OO,M1): dsegment(OM2,OO,M2)




Download 7.05 Mb.
bet69/78
Sana22.07.2021
Hajmi7.05 Mb.
#15506
1   ...   65   66   67   68   69   70   71   72   ...   78
dsegment(OM1,OO,M1): dsegment(OM2,OO,M2):

dsegment(OM3,OO,M3):

triangle(T1,[M1,M2,M3]):

AreCollinear(OO,H,G);testeq(distance(H,G) = 2*distance(G,OO));

draw([C(color='COLOR'(RGB,1.00000000,1.00000000,.8000000000),filled=true), T(color=blue),T1,A3M3,A2M2,A1M1,A2A22,A3A33,A1A11,

dsg1(style=LINE,color=green,thickness=3),dsg2(thickness=3,color=green),OM1, OM2,OM3],axes=NONE);


>with(geometry):Angle := table():

n := 8:

for i to n do Angle[i] := 2*Pi*i/n end do:

dsegment(dseg,point(A,0,0),point(B,4,0)): point(o,0,0):

circle(c,[o,1]):

homothety(c1,c,3/2,point(M,-1,0)):

homothety(c2,c,2,point(M,-1,0)):

homothety(c3,c,5/2,point(M,-1,0)):

translation(t,c,dseg):

translation(tt,c1,dseg):



Download 7.05 Mb.
1   ...   65   66   67   68   69   70   71   72   ...   78




Download 7.05 Mb.

Bosh sahifa
Aloqalar

    Bosh sahifa



dsegment(OM1,OO,M1): dsegment(OM2,OO,M2)

Download 7.05 Mb.