Ответ(ы) на вопрос:
Гость//PascalABC.Net 3.2
function f(n: integer):=1/(n*n*n);
begin
var sum:=0.0;
for var i:=1 to 1000 do sum+=f(i);
write (sum);
end.
Не нашли ответ?
Похожие вопросы