Предмет: Информатика,
автор: софа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
Похожие вопросы
Предмет: Биология,
автор: 108ffm
Предмет: Другие предметы,
автор: vasenkovaolga8
Предмет: Биология,
автор: pskjsuoskwnsj
Предмет: Математика,
автор: Dapoli56