Дан массив А(8). (3,5,7,-11,-5,3,7,8) . Найти сумму не четных элементов

Question

Дан массив А(8). (3,5,7,-11,-5,3,7,8) . Найти сумму не четных элементов

Answer 1

PascalABC.NET 3.3

begin
 var a:=Arr(3,5,7,-11,-5,3,7,8).Println;
 writeln('s = ',a.Where(x->x mod 2<>0).Sum);
end.

Результат:
3 5 7 -11 -5 3 7 8
s = 9