@Krivitskiy_Anton
Специалист по тестированию

Задачка на фортране, где тут мб ошибка?

Решаю задачу на фортране, уже все перепробовал, но ответ не сходится. Скоро дедлайн уже, прошу хотя бы подсказать в чем ошибка.
Вывести на экран таблицу значений функции Y (правый столбец с арктангенсом) и ее разложения в ряд S(x), из параметров этого варианта n=120, интервал [a,b]=[0.1,1] шаг h=0.1. Суть в том, что разложение S и функция У при равном Х должны совпадать.
Вот ссылка на код
5ea7a1e080272035242112.jpeg
  • Вопрос задан
  • 142 просмотра
Решения вопроса 2
jcmvbkbc
@jcmvbkbc
"I'm here to consult you" © Dogbert
s=0
    p=1
    do i=1, n
        p=p*((x**(2*i+1))/(4*(i**2)-1))
        s=s+p
    end do

ошибка в вычислении p: во-первых не нужно умножать очередное значение на предыдущее, а во-вторых ряд в задании знакопеременный, а у тебя -- нет.
Поправленный код.
Ответ написан
15432
@15432
Системный программист ^_^
Зачем вы p меняете на каждом шаге? Напишите точно как на формуле в скриншоте:
p=((-1)**(i+1))*((x**(2*i+1))/(4*(i**2)-1))
Ответ написан
Пригласить эксперта
Ваш ответ на вопрос

Войдите, чтобы написать ответ

Войти через центр авторизации
Похожие вопросы