Голяшов Антон ДЗ1(Asymptote) рисунок 8

import geometry;
//import patterns;
//defaultpen(fontsize(12pt));
defaultpen(0.75);
dotfactor=5;
size(9cm,0);
point O = origin;
real r = 1;
circle c = circle(O, r);
real Phi =  40;
real Alpha = 100;
point B = r*dir(Phi);
point A = r*dir(Phi+90);
point C = r*dir(Phi-Alpha);
point B1 = r*dir(Phi+180);

fill(O--A--B--cycle, red+opacity(0.2));
fill(O--C--B--cycle, yellow+opacity(0.2));
path g = arc(O, r*dir(Phi+90), r*dir(Phi-Alpha));
fill(C--O--A--g--cycle, blue+opacity(0.2));

dot(O);
label("$O$", origin, W);
draw(c, black+linewidth(1.1));
dot(A); dot(B); dot(C); dot(B1);
label("$A$", A, NW); label("$B$", B, NE);
label("$C$", C, SE); label("$B_1$", B1, SW);
draw(A--O--B^^B1--O--C);
markrightangle(A,O,B);
markangle(Label("$\alpha$"), C, O, B, radius=0.44cm);
draw(A---B); draw(B---C);
label("$\sqrt2$", (A+B)/2, N); label("$\frac{10}{7}$", (B+C)/2, SE);
label("$1$", (B1+O)/2, SE); label("$1$", (C+O)/2, NE); label("$1$", (B+O)/2, SE);
real coof = 0.44;
label("$S_1$", coof*r*dir((2*Phi+90)/2));
label("$S_2$", coof*r*dir((2*Phi-Alpha)/2));
label("$S_3$", 1.15*coof*r*dir(Phi+150));
draw(B1--O^^O--C^^O--B, white+opacity(0), StickIntervalMarker(1, size=0.2cm));