// PascalABC.NET 3.3 begin var a:=ArrRandom(20,1,50); a.Println; Write('среднее значение элементов массива, значение которых превышают 10 = ', a.Where(x->x>10).Average); end.
Пример: 44 1 2 4 5 50 41 1 14 41 17 21 2 11 31 39 19 50 4 35 среднее значение элементов массива, значение которых превышают 10 = 31.7692307692308
begin
var a:=ArrRandom(20,1,50); a.Println;
Write('среднее значение элементов массива, значение которых превышают 10 = ',
a.Where(x->x>10).Average);
end.
Пример:
44 1 2 4 5 50 41 1 14 41 17 21 2 11 31 39 19 50 4 35
среднее значение элементов массива, значение которых превышают 10 = 31.7692307692308