Введите с клавиатуры одномерный массив F(T), элементами которого являются положительные и
Введите с клавиатуры одномерный массив F(T), элементами которого являются положительные и отрицательные целые числа. Найдите среднее арифметическое значение четных и нечетных частей массива, сравните значение меж собой, определив малое. Сформируйте новый массив E(N), состоящий из частей массива F(T), которые больше отысканного малого значения.
Задать свой вопрос
Предполагается, что в массиве есть желая бы одно четное и одно нечетное значение.
PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018
Внимание! Если программка не работает, обновите версию!
begin
var F := ReadArrInteger(ReadInteger('T='));
var ae := F.Where(p -gt; p.IsEven).Average;
var ao := F.Where(p -gt; p.IsOdd).Average;
var m := Min(ae, ao);
var E := F.Where(p -gt; p gt; m).ToArray;
E.Println
end.
-
Вопросы ответы
Статьи
Информатика
Статьи
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.
Математика.
Химия.