Нахождение суммы ряда - Pascal

Узнай цену своей работы

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

x + x^3\3+x^5\5+ ......x^11\11

Решение задачи: «Нахождение суммы ряда»

textual
Листинг программы
begin
  var x := ReadlnReal('x = ');
  Writeln(Range(1, 11, 2).Sum(n -> Power(x, n) / n));
end.

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

  1. Создается переменная x и присваивается значение введенное пользователем с помощью функции ReadlnReal('x = '), которая считывает вещественное число.
  2. Вычисляется сумма ряда с помощью функции Range(1, 11, 2).Sum(n -> Power(x, n) / n), где:
    • Range(1, 11, 2) создает последовательность чисел от 1 до 11 с шагом 2 (1, 3, 5, 7, 9, 11).
    • Для каждого числа n из этой последовательности вычисляется значение Power(x, n) / n (x в степени n, деленное на n).
  3. Результат суммы ряда выводится с помощью функции Writeln.

Оцени полезность:

15   голосов , оценка 4.2 из 5