Вычисление суммы ряда - Pascal (80873)

Формулировка задачи:

помогите составить код на паскале x+(x^3/3!)+(x^5/5!)+...+(x^2n-1/(2n-1)!)+...

Решение задачи: «Вычисление суммы ряда»

Листинг программы

program series;
 
var
 x, factorial : Integer;
 i, n : Word;
 sum : Real;
 
begin
  readln (x, n);
  
  sum := x;
  factorial := 1;
  for i := 2 to n do
    begin
      factorial := factorial * (2*i-1 -1)*(2*i-1);    //обновляем факториал
      sum := sum + power(x, 2*i-1/factorial);
    end;
    
  writeln (sum);
  readln;
  
end.

Объяснение кода листинга программы

Объявление переменных:
- x - целое число для хранения значения для ряда
- factorial - целое число для хранения значений факториала
- i - целое число для использования в цикле
- n - целое число для хранения вводимого значения
- sum - вещественное число для хранения суммы ряда
Ввод значений:
- Считывание значений x и n с клавиатуры
Вычисление суммы ряда:
- Присвоение переменной sum значения x (начальное значение ряда)
- Присвоение переменной factorial значения 1
- Цикл от 2 до n:
  - Обновление factorial на каждой итерации: factorial умножается на выражение (2i-1 - 1)(2*i-1)
  - Обновление sum на каждой итерации: sum увеличивается на значение power(x, 2*i-1/factorial) -- power предположительно является функцией возведения в степень
Вывод результата:
- Вывод значения переменной sum на экран
- Ожидание нажатия клавиши для завершения программы.