Решение 

 



Замена:  sin x = t  ⇒


k, m, `in`(n, Z)
x = `+`(`-`(`*`(`+`(`*`(5, `*`(Pi))), `/`(1, 6))), `*`(2, `*`(Pi, `*`(k)))), x = `+`(`*`(`/`(1, 2), `*`(Pi)), `*`(2, `*`(Pi, `*`(k)))) 

Image 

Проверка 

> solve(`+`(`*`(2, `*`(`^`(t, 2))), `-`(t), `-`(1)) = 0); 1
 

-`/`(1, 2), 1 (20.2.1)
 

> with(RealDomain); -1; solve(`*`(`+`(cos(`+`(`*`(2, `*`(x)))), sin(x)), `*`(RealDomain:-`^`(sqrt(sin(`+`(x, `-`(`*`(Pi, `*`(RealDomain:-`^`(4, -1))))))), -1))) = 0)
 

`+`(`*`(`/`(1, 2), `*`(Pi))), `+`(`-`(`*`(`/`(1, 6), `*`(Pi)))), `+`(`-`(`*`(`/`(5, 6), `*`(Pi)))) (20.2.2)
 

> with(plots); -1; `assign`(a1, polarplot(1, theta = `+`(`-`(`*`(`/`(1, 6), `*`(Pi)))) .. 0, color = red, thickness = 10)); -1; `assign`(a2, polarplot(1, theta = 0 .. `+`(`*`(`/`(1, 2), `*`(Pi))), color...
with(plots); -1; `assign`(a1, polarplot(1, theta = `+`(`-`(`*`(`/`(1, 6), `*`(Pi)))) .. 0, color = red, thickness = 10)); -1; `assign`(a2, polarplot(1, theta = 0 .. `+`(`*`(`/`(1, 2), `*`(Pi))), color...
with(plots); -1; `assign`(a1, polarplot(1, theta = `+`(`-`(`*`(`/`(1, 6), `*`(Pi)))) .. 0, color = red, thickness = 10)); -1; `assign`(a2, polarplot(1, theta = 0 .. `+`(`*`(`/`(1, 2), `*`(Pi))), color...