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

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

n= 10
3025

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.