Question

Найдите среднее арифметическое элементов массива, состоящего из nxm случайных чисел (от 0 до 100), которые превышают по величине число С. (Двумерный массив).
Программа ABC.NET

Answer 1

Ответ:

##

var c := ReadInteger('Введите c:');

var (n, m) := ReadInteger2('Введите n и m:');

var a := MatrRandom(n, m, c, 100);

a.print(4);

var s := ((ArrGen(a.RowCount,r -> a.Row(r).Sum)).sum)/(m*n);

print('Среднее арифметическое=',s);