Ответ:
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.
Объяснение:
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
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.
Объяснение: