Zhovizakl
6 год назад
Массив А состоящий из n элементов. Найти среднее арифметическое его элементов с нечетными номерами.
ОТВЕТЫ
Федосьевич
Jul 2, 2019
// PascalABC.NET 3.2, сборка 1379 от 21.01.2017
// Внимание! Если программа не работает, обновите версию!
// Элементы нумеруются от нуля
begin
var a:=ArrRandom(ReadInteger(n=),-99,99); a.Println;
Writeln(Mнечет=,a.Where((x,i)-gt;i.IsOdd.Average)
end.
Пример
n= 16
-72 40 47 -74 -34 -99 8 -83 55 49 -6 -26 -15 2 4 0
Mнечет=-23.875
// Внимание! Если программа не работает, обновите версию!
// Элементы нумеруются от нуля
begin
var a:=ArrRandom(ReadInteger(n=),-99,99); a.Println;
Writeln(Mнечет=,a.Where((x,i)-gt;i.IsOdd.Average)
end.
Пример
n= 16
-72 40 47 -74 -34 -99 8 -83 55 49 -6 -26 -15 2 4 0
Mнечет=-23.875
158
