Advertisement
sutasuu

Homework№1(pic.8)

Sep 12th, 2024 (edited)
41
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Asymptote 1.22 KB | Source Code | 0 0
  1. import geometry;
  2.  
  3. size(9cm, 0);
  4. defaultpen(fontsize(10pt));
  5. dotfactor = 4;
  6.  
  7. pair A,B,B1,C;
  8. point O=origin;
  9. real r = 2;
  10. real x = 5/21;
  11. circle circ = circle(O, r);
  12. B= point(circ, x*length(circ));
  13. B1= point(circ, (x+1/2)*length(circ));
  14. O=circ.C;
  15. C=point(circ, -1/15*length(circ));
  16. A=point(circ, (x+1/4)*length(circ) );
  17.  
  18. fill(A--O--B--cycle, red+white);
  19. fill(C--O--B--cycle, blue+white);
  20. fill(arc(O,B1,C)--O--cycle, orange+white);
  21. fill(arc(O,A,B1)--O--cycle, orange+white);
  22.  
  23. markangle(Label("$\alpha$", Relative(0.5), align = NE), radius = 0.3cm, n=1, C,O,B);
  24. markrightangle(size=0.2cm, B,O,A);
  25. draw(B--B1);
  26. draw(B--C^^O--C^^O--A^^A--B);
  27. draw(circ);
  28.  
  29.  
  30. pair   p []={A, B, B1, C, O};
  31. pair   v []={W, N, S, SE, SW};
  32. string n []={"$A$", "$B$", "$B_1$", "$C$", "$O$"};
  33.  
  34. for ( int k=0; k<p.length ; ++k)
  35. dot ( Label (n[k] , align =v[k]) ,p[k ]);
  36.  
  37. label(Label("$1$", Relative(0.5)), A--O);
  38. label(Label("$1$", Relative(0.5)), B--O);
  39. label(Label("$1$", Relative(0.5)), C--O);
  40. label(Label("$\sqrt2$", Relative(0.5), Rotate(dir(A--B)), align = N), A--B);
  41. label(Label("$\frac{10}3$", Relative(0.5), Rotate(dir(B--C)), align = NE), B--C);
  42. label("$S_1$", (A+O+B)/3);
  43. label("$S_2$", (C+O+B)/3);
  44. label("$S_3$", (A+O+1.5*B1)/3);
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement