Информатика, вопрос задал gyugghkhg , 2 года назад

Ввести массив А.
Если в массиве положительных элементов больше, чем отрицательных, то найти сумму всех элементов массива.

Ответы на вопрос

Ответил BobbyFresnel
0

begin

 var n := ReadInteger;

 var a := ReadArrInteger(n);

 if (a.Where(p -> p > 0).Count) > (a.Where(p -> p < 0).Count) then

   a.Sum.Println;

end.

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

Новые вопросы