1 + 1/24 + 1/34 +…+ 1/n4 =0.000001 Ответ: 1.08232 Напишите программу в паскале
1 + 1/24 + 1/34 +…+ 1/n4
=0.000001 Ответ: 1.08232
Напишите программу в паскале
Ответ(ы) на вопрос:
Гость
Var
e, a, s: real;
i: integer;
begin
write('Введите точность Е ');
readln(e);
a := 0;
s := a;
i := 0;
repeat
i := i + 1;
a := 1 / sqr(sqr(i));
s := s + a;
until abs(a) < e;
writeln(s);
end.
Не нашли ответ?
Похожие вопросы