50 баллов помогите с информатикой
Приложения:
Ответы на вопрос
Ответил LikeSmileLJkee
0
var eps,e,s: real;
k: integer;
begin
write('Введите Eps: ');
readln(eps);
s:=0;
k:=1;
e:=(k+2)/((k*k*k)+4);
while e>abs(eps) do begin
s:=s+e;
inc(k);
e:=(k+2)/((k*k*k)+4);
end;
writeln('Сумма ',k,' элементов равна ',s:5);
end.
Ответил Артур998
0
Спасибо большое, помогите пожалуйста с этим заданием https://znanija.com/task/31126592
Ответил LikeSmileLJkee
0
Чуть позже гляну, как домой приду
Новые вопросы
Русский язык,
1 год назад
Русский язык,
1 год назад
Математика,
7 лет назад
Литература,
7 лет назад
Математика,
8 лет назад