Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

Составить программу нахождения среднего арифметического таблицы ( на языке Паскаль ).

Ответ оставил Гость

Если таблицей считать матрицу n*m то может получиться так:

//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)
begin
  var s:=0;
  var n:=ReadlnInteger(Введите N);
  var m:=ReadlnInteger(Введите M);
  var a:=MatrixRandom(n,m); println(a);
  for var i:=0 to n-1 do
    for var j:=0 to m-1 do s:=s+a[i,j];
  println(Среднее арифметическое:,s/(n*m));
end.