Question

Составить програму вычисления суммы всех нечетных элементов массива из 8 случайных целых чисел из диапазона от 0 да 200.

Answer 1

===== PascalABC.NET =====

begin

 var a :=ArrRandom(8, 0, 200);

 a.Println;

 a.Where(p -> p.IsOdd).Sum.Println

end.