Дано натуральное число n. Вычислить: 1/1^3+1/2^6+1/3^9+...+1/n^(3*n)
Дано натуральное число n. Вычислить: 1/1^3+1/2^6+1/3^9+...+1/n^(3*n)
Ответ(ы) на вопрос:
Гость
var
i, n, j: integer;
a, s: real;
begin
readln(n);
for i := 1 to n do
begin
a := 1;
for j := 1 to 3 * i do
a := a * 1 / i;
s := s + 1 / a;
end;
writeln(s:5:3);
end.
Не нашли ответ?
Похожие вопросы