Вопрос по информатике:
Дано натуральное число N и вводятся числа a1, a2 , a3 , …, aN. Найти сумму их кубов
в паскале пожалуйста
- 14.10.2017 07:14
- Информатика
- remove_red_eye 7253
- thumb_up 13
Ответы и объяснения 1
// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
var a:=ReadArrInteger('Вводите числа:',ReadInteger('n='));
Writeln('Сумма кубов ',a.Select(x->x*x*x).Sum)
end.
Тестовое решение:
n= 6
Вводите числа: 6 3 5 2 4 1
Сумма кубов 441
- 15.10.2017 22:50
- thumb_up 43
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.