Вопрос, который вызвал трудности

Даны натуральное n, действительное число х. Вычислить: sin x+ (sin)^2 x+ ...+(sin)^n x

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

Var
x, sum, s: real;
i, n: integer;
begin
sum := 0;
read(n, x);
s := 1;
for i := 1 to n do
begin
s := s * sin(x);
sum := sum + s;
end;
writeln(sum);
end.