Вычислить с заданной точностью ε значение функции Y для каждого из 20 значений Х

@xolyspirit · Регистрация: 04.10.2013

Студворк — интернет-сервис помощи студентам

В общем задача такая:
Вычислить с заданной точностью ε значение функции Y для каждого из 20 значений Х:
Y = 1 – X / 2 + (1*3*X2) / (2*4) – (1*3*5*X3) / (2*4*6) + (1*3*5*7*X4) / (2*4*6*8) – ...
Значения Х и ε ввести.

Каждый член ряда больше предыдущего по модулю. Как при этом подсчитать сумму с заданной точностью я плохо понимаю. Причем с каждым шагом в результате меняется знак и увеличивается шаг в модуле результата.
Если что пинайте, а за помощь спасибо скажу.

Добавлено через 3 минуты
До того как попробовал просчитать вручную пытался составить программу вот так:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
Program CR2;
uses crt;
var 
x,y:array[1..20] of real; {массив} 
i,k:integer; {дополнительные переменные, е – количество символов после запятой} 
left,shag,right,eps:real; 
 
begin
 Write('Требуемая точность, например 0,0001 ');
 Readln(eps);{берем требуемую точность}
 
 
for i:=1 to 20 do 
begin
 Writeln('x[',i,']='); 
 Readln(x[i]); {берем значения Х}
end;
 
for i:=1 to 20 do {Внешний цикл - перебирает значения Х}
begin
right:=2;
left:=1-x[i];
y[i]:=left/right;{задаем старовые параментры переменных}
k:=0;
left:=x[i];
while abs(shag)>=eps do{цикл производит вычисления до достижения заданной точности}
begin
k:=k+2;
left:=left*(k+1)*x[i];
right:=right*(k+2);
shag:=left/right;
if (k mod 4=0) 
then shag:=shag*1
else shag:=shag*(-1);
y[i]:=y[i]+ shag; 
end;
 
writeln('При Х=',x[i],' Y=',y[i]){выводим результат}
end;
readln;
end.

Естественно вернули на переделку, так как результат неверный.

ФедосеевПавел · 07.02.2016, 10:28

Подозреваю, что нужно внимательно почитать задание на лабораторку. В задании, наверняка, перечислены входные и выходные параметры, форматы входных/выходных параметров, способы ввода/вывода (консоль или файл). И строго выполнить эти требования.
К примеру, в посте #1 я не вижу ввод 'Знаков после нуля в результате ', но в программе он реализован. Может быть требуется не ввод в массив, а вычисление сразу после ввода, и преподаватель ожидает ввод x и сразу вывод y, вместо ввода 20 x и просмотра потом 20 y.
Это я всё привёл к примеру. Нужно уточнить требования методички и преподавателя.

Не по теме:

У нас на "микропроцессорной технике" у преподавателя было требование, чтобы 10 тактов тактового генератора отображались в 10 клеточках осциллографа. Но период тактов был не кратен периоду развёртки - такты не совпадали с клетками - и наши лабы он не принимал, до тех пор, пока мы не стали подстраивать развёртку. Так что требования придётся соблюдать - выбор не богат хотя и существует (даже когда вас проглотила акула - у вас есть два выхода).

Добавлено через 13 минут
Что ещё - сделайте распечатку протокола работы программы, распечатку вычислений тех же параметров в wolfram и СО СМИРЕНИЕМ подойдите к преподавателю, с ПРОСЬБОЙ пояснить, в чем ошибка, ведь вы уже перепроверили расчёты в другой программе и они совпали, может быть ошибка в оформлении ввода/вывода. Также подготовьтесь и при необходимости покажите подготовленные расчёты ОДЗ (области допустимых значений) на основе признаков Даламбера и Лейбница.

Большим форум помочь не сможет.

@xolyspirit · 07.02.2016, 18:50 **[ТС]**

А ошибка таки есть.

Pascal
1
2
if abs(x[i]) >= 1.0 then
      writeln('При Х>=1 числовой ряд не сходится')    else

Маткад показывает, что Х вполне может принимать и 1 и -1. А все остальное так же как в программе.

Новые блоги и статьи Все статьи Все блоги /
Расчёт периметра прямоугольника по координатам вершин Maks 18.07.2026 Решение задачи по прикладной информатике средствами 1С. Задача: Вычислить периметр прямоугольника, заданного координатами своих вершин на плоскости. Решение: Создан документ со следующими. . .	Подсчёт частоты трёхбуквенных слов в тексте Maks 18.07.2026 Решение задачи по прикладной информатике средствами 1С. Задача: Выясните, сколько раз в предложенном тексте встречается каждое трехбуквенное слово. Решение: Создан документ с единственным. . .	Сумма и количество положительных элементов в чётных строках массива Maks 18.07.2026 Решение задачи по прикладной информатике средствами 1С. Задача: Вычислить сумму и количество положительных элементов массива, расположенных в четных строках. Решение: Создан документ с. . .	Поиск произведения положительных чётных чисел в последовательности Maks 18.07.2026 Решение задачи по прикладной информатике средствами 1С. Задача: Дана произвольная последовательность целых чисел. Найти произведение положительных четных чисел данной последовательности. . . .
Обработка трёх чисел: утроение и возведение в степень Maks 18.07.2026 Решение задачи по прикладной информатике средствами 1С. Задача: Даны три действительных числа. Утроить те из них, значения которых неотрицательны, и возвести в четвертую степень отрицательные. . . .	Расчёт стоимости яблок по весу Maks 18.07.2026 Решение задачи по прикладной информатике средствами 1С. Задача: Написать программу вычисления стоимости некоторого количества (по весу) яблок. Решение: Создан документ, с табличной частью. . .	сукцессия 30. Фосфорный и азотный замки по "честному" закону лимитирования Либиха anaschu 16.07.2026 Основные достижения за последние дни 1. Механизм отложенного высвобождения фосфора Добавлен специальный пул для медленного разложения меланизированных гиф ЕСМ Реализована разная скорость. . .	Запрет пометки на удаление и отмены проведения Maks 16.07.2026 Алгоритм из решения ниже реализован на нетиповом документе "ПутевойЛист" разработанного в КА2. Задача: запретить помечать на удаление и отменять проведения путевого листа при условии, если он сдан. . .

ФедосеевПавел Модератор 8674 / 4511 / 1670 Регистрация: 01.02.2015 Сообщений: 13,941 Записей в блоге: 13
	07.02.2016, 10:28
	Сообщение было отмечено xolyspirit как решение Решение Подозреваю, что нужно внимательно почитать задание на лабораторку. В задании, наверняка, перечислены входные и выходные параметры, форматы входных/выходных параметров, способы ввода/вывода (консоль или файл). И строго выполнить эти требования. К примеру, в посте #1 я не вижу ввод 'Знаков после нуля в результате ', но в программе он реализован. Может быть требуется не ввод в массив, а вычисление сразу после ввода, и преподаватель ожидает ввод x и сразу вывод y, вместо ввода 20 x и просмотра потом 20 y. Это я всё привёл к примеру. Нужно уточнить требования методички и преподавателя. Не по теме: У нас на "микропроцессорной технике" у преподавателя было требование, чтобы 10 тактов тактового генератора отображались в 10 клеточках осциллографа. Но период тактов был не кратен периоду развёртки - такты не совпадали с клетками - и наши лабы он не принимал, до тех пор, пока мы не стали подстраивать развёртку. Так что требования придётся соблюдать - выбор не богат хотя и существует (даже когда вас проглотила акула - у вас есть два выхода). Добавлено через 13 минут Что ещё - сделайте распечатку протокола работы программы, распечатку вычислений тех же параметров в wolfram и СО СМИРЕНИЕМ подойдите к преподавателю, с ПРОСЬБОЙ пояснить, в чем ошибка, ведь вы уже перепроверили расчёты в другой программе и они совпали, может быть ошибка в оформлении ввода/вывода. Также подготовьтесь и при необходимости покажите подготовленные расчёты ОДЗ (области допустимых значений) на основе признаков Даламбера и Лейбница. Большим форум помочь не сможет. 1

Вычислить с заданной точностью ε значение функции Y для каждого из 20 значений Х

Решение