Предмет: Информатика,
автор: софа490
Составить программу
Найти сумму кубов чисел от одного до n, где n вводится с клавиатурой
Сроочно, даю 20 баллов
Ответы
Автор ответа:
1
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
Похожие вопросы
Предмет: География,
автор: aygun1981aygun
Предмет: Русский язык,
автор: uuserov292
Предмет: Математика,
автор: Ychenik229
Предмет: Математика,
автор: Dapoli56