Отыскать десять решений уравнения 7sin2x=1, выразив углы в градусах в Pascal

Поначалу решим данное уравнение

, nZ

, nZ

_________________________________________________

Составим программку для решения данного уравнения

___________

Program n_1;

uses math;

var n:integer; x:real;

begin

   for n:=-5 to 5 do writeln((power(-1, n)*arcsin(1/7)/2+PI*n/2)*180/PI:0:20);

end.

_________________________________________________

Значения грдусной меры углов выводятся с точностью до 20 символов после запятой