PascalABC.NET
begin
var A := ArrRandom(10, -99, 99);
A.Println;
A.Where(k -> k > 12).Count.Println;
end.
Объяснение:
