import patterns;

add("hatch", crosshatch(1mm));

defaultpen(0.5);
bbox(white, Fill);

filldraw(circle((0, 0), 100), fillpen=pattern("hatch"));

path a;
path b;
int n = stdin;
int m = stdin;
for (int i = 0; i < n; ++i) {
  real angle = stdin;
  pair p = dir(-angle + 90) * 100;
  a = a -- p;
  if (i != 3) {
    b = b -- p;
  }
  filldraw(circle(p, 5), fillpen=red);
}
a = a -- cycle;
b = b -- cycle;

filldraw(b, fillpen=white);

shipout(bbox(xmargin=2, white, Fill));