Question

дан одномерный массив а1, а2 ... аn. посчитать среднее значение элементов массива, значение которых превышают 10.

Answer 1

// 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