Задан массив из 25 элементов,заполненный в диапазоне от -50 до 50.найти и вывести среднее арифметическое элементов массива положительных и кратных 7.

popravkinaekaterina popravkinaekaterina    2   15.12.2019 19:30    1

Ответы
Маргоритка11 Маргоритка11  10.10.2020 20:48

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

begin

 var a := ArrRandom(25, -50, 60);

 a.Println;

 a.Where(p -> (p > 0) and (p mod 7 = 0))

     .DefaultIfEmpty

     .Average

     .Println

end.


Задан массив из 25 элементов,заполненный в диапазоне от -50 до 50.найти и вывести среднее арифметиче
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика