Задание 2 Тема: Ряды (циклы, итерации).

Операторы DO используются для организации циклических расчетов.

Цикл - это последовательность операторов, которая может автоматически выполняться более одного раза. Если количество повторов известно заранее (или может быть однозначно вычислено), используется оператор Цикл_с_параметром (DO «UNTIL»). Если количество повторов неизвестно, применяется оператор Цикл_с_Пред_условием (DO «WHILE»).

Вычислить сумму ряда:

a) с заданной точностью ξ и вывести количество итераций;

b) для 20-ти членов ряда.

Σ = 1/(1*3) + 1/(3*5) + 1/(5*7) + … ξ=0.0001 Ответ: 0.500

1
Нужно написать программу))

Ответы и объяснения

2013-11-28T21:41:04+04:00
Var a:real;
i,p,i1,i2,e:longint;
begin
i1:=1; i2:=3;
read(e);
for i:=1 to 20 do
begin
a:=a+1/(i1*i2);
inc(p);
i1:=i1+2; i2:=i2+2;
end;
writeln('Сумма ряда ', a:2:e);
writeln('Кол-во итераций ',p);
end.