Найти частичную сумму ряда. - Pascal

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

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

Дан ряд: Найти частичную сумму ряда Ряд сходится к значению 2-2*ln2 = 0,613_705_8 (Два минус натуральный логарифм двух дважды) И больше в задании ничего нет! Такую тему по Мат.анализу не проходили ещё! Я даже не понял с чего начать-то надо!

Решение задачи: «Найти частичную сумму ряда.»

textual
Листинг программы
  1. var n:integer;
  2.     e,t,s:real;
  3. begin
  4. e:=0.0000001; //точность вычислений, можно взять меньше, но больше 0
  5. n:=0;
  6. t:=1;
  7. s:=0;
  8. while t>e do
  9.  begin
  10.   n:=n+1;
  11.   t:=1/n/(2*n+1);
  12.   s:=s+t;
  13.  end;
  14. writeln('S=',s:0:7);
  15. write('2-2ln(2)=',2-2*ln(2):0:7);
  16. end.

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

  1. Объявляется переменная n типа integer.
  2. Устанавливается значение переменной e равным 0.0000001, которое представляет точность вычислений.
  3. Инициализируется переменная n значением 0.
  4. Устанавливается значение переменной t равным 1.
  5. Устанавливается значение переменной s равным 0.
  6. Запускается цикл while, который будет выполняться, пока значение t больше e.
    1. Увеличивается значение n на 1.
    2. Вычисляется новое значение t по формуле t:=1/n/(2*n+1).
    3. К значению s прибавляется значение t.
  7. Выводится значение s с точностью до 7 знаков после запятой.
  8. Выводится значение 2-2ln(2) с точностью до 7 знаков после запятой.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

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

14   голосов , оценка 3.857 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут