Question

дан одномерный массив А состоящий из целых чисел .вывести на экран среднее арифметическое значение для всех нечетных элементов массива. предусмотреть выдачу сообщения "нет",если нечестных чисел нет

Answer 1

Решение представлено на фото ниже

Answer 2

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

begin

 var n := ReadInteger;

 var a := ArrRandom(n, -99, 99);

 a := a.Println.Where(p -> p.IsOdd).ToArray;

 if a.Length = 0 then

   Print('нет')

 else

   a.Average.Print

end.