begin
// 1
var a:= ReadArrInteger(10);
a.Count(p -> p < 0).Println;
// 2
var b := ArrRandom(10, -30, 50);
b.Println;
b.Where(p -> p.IsOdd).Min.Println
end.
begin
// 1
var a:= ReadArrInteger(10);
a.Count(p -> p < 0).Println;
// 2
var b := ArrRandom(10, -30, 50);
b.Println;
b.Where(p -> p.IsOdd).Min.Println
end.