begin
var arr := new integer[10]; // Объявляем массив состоящий из 10 целых чисел
// Заполняем массив случайными числами в диапазоне от 0 до 10
for var i := 0 to arr.High do
arr[i] := Random(0, 10);
var sum := 0; // Объявляем переменную sum для хранения суммы всех чисел массива
// В цикле берем каждый элемент и суммируем в sum
forEach var x in arr do
sum += x;
// Делим всю сумму (sum) на 10 (длину массива) и получаем нужное значение
var average := sum / 10;
Println('Среднее значение:', average);
end.
