Вычисление значение функции arctg(x) с погрешностью - Free Pascal

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

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

Доброе время суток дорогие. В общем, учусь на 1 курсе, и вот 2 лаба по программированию, на умение использовать операторы цикла. Нужно написать программу, которая вычисляет значение функции arctg(x),с некоторой погрешностью EPS путем вычисле- ний указанного бесконечного ряда. Решение необходимо получить для 5 наборов исходных данных. Величину EPS изменять в диапазоне 0,01..0,00001 пpи одном значении аpгумента. Для пpовеpки пpавильности вычислений сpавнить значение полученной суммы pяда со значением библиотечной функции. Ряд: X-X^3/3+X^5/5-... Но дело в том, что я без понятия что такое бесконечный ряд, и как его вообще можно посчитать (препод сказал что, мол должны знать, что им в свое время в школе объясняли). А я вот в школе это не проходил вообще. В общем сижу сижу, и не могу понять что и как писать, а понять хочется. И сдавать лабу на следующей неделе уже. Кому не сложно, можете помочь разобраться? Буду очень благодарен .

Решение задачи: «Вычисление значение функции arctg(x) с погрешностью»

textual
Листинг программы
  1. uses crt;
  2. function Sum(x,e:real):real;
  3. var n:integer;
  4.     t,s:real;
  5. begin
  6. n:=0;
  7. t:=x;
  8. s:=t;
  9. while abs(t)/(2*n+1)>=e do
  10.  begin
  11.   n:=n+1;
  12.   t:=-t*(x*x);
  13.   s:=s+t/(2*n+1);
  14.  end;
  15. Sum:=s
  16. end;
  17.  
  18. var x,e:real;
  19. begin
  20. clrscr;
  21. repeat
  22. write('|x|<1 x=');
  23. readln(x);
  24. until abs(x)<1;
  25. e:=0.01;
  26. repeat
  27. writeln('при eps=',e:0:5,' F=',Sum(x,e):0:5);
  28. e:=e/10;
  29. until e<0.00001;
  30. writeln('Проверка arctd(',x:0:2,')=',arctan(x):0:5);
  31. readln
  32. end.

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

  1. Объявлены две переменные: x и e, типа real.
  2. Задана погрешность e=0.01.
  3. В цикле с условием на readln(x) считывается значение переменной x с клавиатуры, пока не будет введено значение |x|<1.
  4. В функции Sum(x,e) вычисляется сумма ряда для функции arctg(x) с заданной погрешностью.
  5. В цикле с условием на e<0.00001, выводятся значения функции Sum(x,e) и проверяется приближенное значение функции arctan(x) с помощью функции arctd(x).
  6. Программа завершается после проверки функции arctd(x).

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


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

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

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

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

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

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