Александрова Людмила ДЗ1(Asymptote) рисунок 8

import geometry;
size(5cm);
pen f=fontsize(0.2pt);
dotfactor=3;
pair A = dir(160);
pair B = dir(70);
pair C = dir(-30);
pair B1 = dir(250);
pair O=(0,0);
pair A5=midpoint(A--B);
pair A6=midpoint(B--C);
pair A7=midpoint(O--C);
pair A8=midpoint(A--O);
pair A9=midpoint(B--O);

fill(arc(O,B,A)--O--cycle,paleblue);
fill(arc(O,C,B)--O--cycle,palegreen);
fill(arc(O,B1,C)--O--cycle,palered);
fill(arc(O,A,B1)--O--cycle,palegrey);

draw(unitcircle, linewidth(0.4));
dot("$A$", A, dir(A));
dot("$B$", B, dir(B));
dot("$C$", C, dir(C));
dot("$B1$", B1, dir(B1));
dot("$O$", O, dir(210));
draw(O--A, linewidth(0.2));
draw(O--B, linewidth(0.2));
draw(O--C, linewidth(0.2));
draw(O--B1, linewidth(0.2));
draw(A--B, linewidth(0.2));
draw(B--C, linewidth(0.2));

label(rotate(32)*"$\sqrt{2}$",A5, 2N+W, f);
label(rotate(-67)*"$\frac{10}{7}$",A6, NE, f);
label(rotate(-25)*"$1$",A8, 2S, f);
label(rotate(-23)*"$1$",A7, 2S, f);
label(rotate(-16)*"$1$",A9, W, f);
markrightangle(B, O, A, linewidth(0.2));
markangle(C, O, B, radius=0.35cm, linewidth(0.2));
pair S1 = incenter(A,B,O);
label("$S_{1}$",S1, S, f);
pair S2 = incenter(C,B,O);
label("$S_{3}$",S2, S, f);
pair S3 = incenter(A,O,B1);
label("$S_{3}$",S3, S, f);