Дано вещественное число X и целое число N (> 0). Найти значение выражения:X – X3/(3!) + X5/(5!) – … + (–1)N•X2•N+1/((2•N+1)!) (N! = 1•2•…•N). Полученное число является приближенным значением функции sin в точке X — Pascal(Паскаль)

uses crt;
var x,s,t:real;
    n,i:longint;
begin
clrscr;
write('x=');readln(x);
write('n=');readln(n);
s:=x;t:=1;
for i:=1 to n do
  begin
   t:=-t*x*x/(2*i*(2*i+1));
   s:=s+t;
  end;
writeln('Приближенное значение  sinx=',s:6:4);
writeln('Аналитическое значение sinx=',sin(x):6:4);
readln
end.