Составить программу
Найти сумму кубов чисел от одного до n, где n вводится с клавиатурой
Сроочно, даю 20 баллов
Ответы
Ответ дал:
0
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
SeqGen(ReadInteger('n='),t->t*t*t,1).Sum.Println
end.
Пример
n= 10
3025
Внимание! Если программа не работает, обновите версию!
begin
SeqGen(ReadInteger('n='),t->t*t*t,1).Sum.Println
end.
Пример
n= 10
3025
Вас заинтересует
1 год назад
2 года назад
7 лет назад
8 лет назад
8 лет назад