Лабораторные по информатике (1 курс, 2 семестр) для РТ и т.п. / Лаба9 / Y2

% Задача 2: Разложение cos(x) в ряд Тейлора
E = 0.003;
x = 1.4;
n = 0;
a = (-1)^n * x^(2*n) / factorial(2*n);
S = a;
while abs(a) > E
n = n + 1;
a = (-1)^n * x^(2*n) / factorial(2*n);
S = S + a;
end
disp(['Сумма ряда: ', num2str(S)]);
disp(['Число членов ряда: ', num2str(n)]);
disp(['Проверка: cos(x) = ', num2str(cos(x))]);