Напишите программу. Введите с клавиатуры действительное число x и натуральное число N. Рассчитайте и выведите на экран значение выражения ниже. Как показывается в курсе высшей математики, это выражение приближенно определяет значение sin x.Паскаль.

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

Программа на Pascal для вычисления sin(x) с использованием разложения в ряд Тейлора:

program SinApproximation;
var
x: Real;
N: Integer;
i: Integer;
sinX: Real;
fact: Integer;
begin
Write('Введите значение x: ');
ReadLn(x);
Write('Введите значение N: ');
ReadLn(N);
sinX := 0;
for i := 0 to N do
begin
fact := 1;
for j := 1 to 2*i+1 do
fact := fact * j;
sinX := sinX + power(-1, i) * power(x, 2*i+1) / fact;
end;
WriteLn('sin(', x, ') = ', sinX);
end.

Этот код позволяет приближенно вычислить значение sin(x) с помощью разложения в ряд Тейлора с точностью до N членов.