CРОЧНО!!! Заполните массив 10-юслучайными числами в интервале [-7,15] и подсчитать число...

Question

CРОЧНО!!! Заполните массив 10-юслучайными числами в интервале [-7,15] и подсчитать число четных отрицательных элементов. в паскале

Answer 1

Ответ:

PascalABC.NET 3.6.2

begin

 var a := ArrRandom(10, -7, 15);

 a.Println;

 a.Where(p -> (p mod 2 = 0) and (p < 0)).Count.Println;

end.

Объяснение: