Народ срочняк! Помогите решить.
Для заданного натурального n и действительного x подсчитать сумму:
cosx+cos²x/2+cos³x/3+...+ cos^nx/n
Ответы
Ответ дал:
0
Ответ:
Объяснение:
// функция возведения вещественного числа в степень
function stepen(x, n:real):real;
begin
stepen:=exp(n*ln(x));
end;
var
n:integer;
x:real;
i:integer;
sum:real;
begin
readln(n);
readln(x);
sum:=0;
for i:=1 to n do
sum:=sum + stepen(cos(x/i), i);
writeln(sum);
readln;
end.
Вас заинтересует
2 года назад
7 лет назад
7 лет назад