Заполнить массив из 10 элементов случайными числами в интервале [0,100] и подсчитать среднее значение всех элементов, которые <50
Пожалуйста, без randomize и прочих "изысков".

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