Question

ДАЮ 100 БАЛЛОВ
дан двумерный массив определить среднее арифметическое элементов четвертого столбца
Решите через паскаль

Answer 1

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (m,n):=ReadInteger2('Количество строк и столбцов в массиве:');
  Writeln('*** Исходный массив ***');
  var a:=MatrRandom(m,n,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  Writeln('Ср.арифм. элементов 4-го столбца ',a.Col(3).Average)
end.