Даны натуральное n, действительное число х. Вычислить: sin x+ (sin)^2 x+ ...+(sin)^n x
Даны натуральное n, действительное число х. Вычислить: sin x+ (sin)^2 x+ ...+(sin)^n x
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы