Question

Заполните массив из n элементов и в массиве найдите сумму нечетных элементов массива и максимальный элемент в нем
Паскаль!!!!

Answer 1

                                     PascalABC.NET

begin

 var mas := ReadArrInteger('Введите массив:', ReadInteger('N ='));

 Println('Сумма нечетных элементов:',mas.Where(x -> x.IsOdd).Sum);

 print('Максимальный элемент:',mas.Max)

end.