Предмет: Информатика, автор: spalehova

помогите пожалуйста с 13 задачей (напишите программу,не используя power)
огромное спасибо (Pascal ABC )

Приложения:

Ответы

Автор ответа: Аноним

Сумму членов предложенного ряда можно записать в следующем виде:
$displaystyle S=1+sum_{i=1}^n(-1)^i frac{x^{2i}}{(2i)!}=1+sum_{i=1}^nz_iE_i \ z_i= left { {{-1, quad i=1} atop {-(z_{i-1}), quad i textgreater 1}} right. \ E_i= frac{x^2}{2i(2i-1)} times E_{i-1}, quad iinmathbb N$

// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
begin
var x:=ReadReal('x=');
var n:=ReadInteger('n=');
var s:=1.0;
var e:=1.0;
var z:=-1;
for var i:=1 to n do begin
    e:=e*x*x/(2*i*(2*i-1));
    s:=s+z*e; z:=-z
    end;
Writeln(s)
end.

Тестовое решение:
x= 0.45
n= 20
0.900447102352677

Для сравнения cos(0.45)≈0.90044710235267692166884061148
С учетом округления последнего разряда все выведенные знаки верны.

Автор ответа: spalehova

проверила

Автор ответа: Аноним

Что пишет?

Автор ответа: Аноним

Текст сообщения приведите

Автор ответа: Аноним

И, главное, Вы обратили внимание на первую строку в программе: // PascalABC.NET 3.1, сборка 1174 от 22.02.2016

Автор ответа: Аноним

Вы в какой среде запускаете программу?

Предыдущий вопрос

Следующий вопрос