PascalABC.NET:

• ##
• var C := ArrRandom(40, 100, 999);
• C.Println;
• C.Where(x → x.IsEven).Aggregate(BigInteger.One, (a,x) → a*x).Println;
• C.Where(x → x.IsOdd).Sum.Print