обработка двумерных массивов, вычислить среднее значение чисел в каждой строке Опции

[Asia]

Выполнить заданную обработку двумерного массива, имеющего произвольное кол-во строк N и столбцов M.
Cодержатся ограничения на максимальное значение величин N и M. N -->5
M -->5
элементы массива должны вводиться с клавиатуры и для их ввода следует разработать процедуру. Обработка, предусмотренная заданием, и вывод результата необходимо выполнить с помощью предпрограмм.
Help! help!

[Coach]

Что именно у тебя вызывает вопрос.

[Asia]

ввод переменныхх

[Coach]

Вот можешь использовать процедуру

var X:array[1..5,1..5] of integer;

Procedure Vvod(n,m:integer);
var i,j:integer;
begin
For  i:=1 to N do
  For  j:=1 to M do
  begin
	Write('Введите элементы', 'X[', I, ',', j , ']=');
	Readln(X[i,j]);
  end;
end;

.....................

begin
writeln ('Vvedite N');
readln (n);
writeln ('Vvedite M');
readln (m);
Vvod(n,m);
......................
......................
end.