Question

Напишите программу которая формирует массив случайных чисел и выдаёт сумму четных и нечетных элементов

Answer 1

Ответ:

begin

 var a := arrRandomInteger(50);

 a.Println;

 a.Where(x -> Odd(x)).Sum.Println; //Нечетные

 a.Where(x -> not Odd(x)).Sum.Println; //Четные

end.