Найдите сумму первых m частей последовательности. число m вводится. элементы

Найдите сумму первых m частей последовательности. число m вводится. элементы последовательности задаются формулой An=1/n^3

Задать свой вопрос
1 ответ

var

   m : integer;

   s : real;

begin

   write('ввести m=');

   readln(m);

   for var n := 1 to m do s += 1/power(n, 3);

   writeln('Sm=', s);

end.

Славян Тарица
Благодарю
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт