Заполните массив D(6) элементами равными 1/5 порядкового номера. Найдите разность между произведением и суммой квадратов его элементов. Паскаль

Ответ

Автор - BobbyFresnel

===== PascalABC.NET =====

begin

var D := ArrGen(6, i -> i / 5, 1);

Print(D.Product - D.Select(p -> p * p).Sum)

end.

Результат: -3.59392

Предыдущий вопрос Следующий вопрос

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.