Составить программуНайти сумму кубов чисел от одного до n, где n

Составить программку
Отыскать сумму кубов чисел от 1-го до n, где n вводится с клавиатурой
Сроочно, даю 20 баллов

Задать свой вопрос
1 ответ
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программка не работает, обновите версию!

begin
  SeqGen(ReadInteger('n='),t-gt;t*t*t,1).Sum.Println
end.
Пример

n= 10
3025
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт