Заполнить массив из 10 элементов случайными числами в интервале [0,100] и подсчитать среднее значение всех элементов, которые <50
Пожалуйста, без randomize и прочих "изысков".
Ответы
Ответ дал:
0
// PascalABC.NET 3.2, сборка 1439 от 09.05.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(10,0,100); a.Println;
Writeln(a.Where(x->x<50).Average)
end.
Пример
59 31 97 34 33 2 64 84 79 37
27.4
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(10,0,100); a.Println;
Writeln(a.Where(x->x<50).Average)
end.
Пример
59 31 97 34 33 2 64 84 79 37
27.4
Вас заинтересует
1 год назад
8 лет назад
8 лет назад
8 лет назад