Question

Нужен о написать программу в Pascal, помогите пожалуйста

Answer 1

var

n,i: integer;

s: double;

begin

readln(n);

for i:=1 to n do

 s:=s+(1/i**3);

write(s);

end.