Вычислить сумму ряда с точностью e=10-6
10-11 класс
|
var
i,z:integer;
x,n,s,y,t:real;
begin
write('Введите x: ');
readln(x);
z:=1;
y:=1;
n:=2;
repeat
i:=i+1;
y:=y*x*x;
n:=n*(2*i+2)*(2*i+1);
t:=z*(2*i+1)*y/n;
s:=s+t;
z:=-z;
until t<=1e-6;
writeln('S=',s);
end.
Другие вопросы из категории
Найти все целые двузначные числа, сумма цифр в которых равна 8.
Читайте также
e. Определив тип общего члена ряда, и организовав вычисление его суммы со структурой вложенных циклов, получить таблицу, состоящую из переменных X, Y, S, при |X|<1.
ических расчетов.
Цикл - это последовательность операторов, которая может автоматически выполняться более одного раза. Если количество повторов известно заранее (или может быть однозначно вычислено), используется оператор Цикл_с_параметром (DO «UNTIL»). Если количество повторов неизвестно, применяется оператор Цикл_с_Пред_условием (DO «WHILE»).
Вычислить сумму ряда:
a) с заданной точностью ξ и вывести количество итераций;
b) для 20-ти членов ряда.
Σ = 1/(1*3) + 1/(3*5) + 1/(5*7) + … ξ=0.0001 Ответ: 0.500