-Цитата от Трэй 
-Цитата от Hammer -Цитата от Трэй
-maxint это чо?
Максимальное отрицательное число типа integer.
и какой из этих всех вариантов более правильный?)
Код:
Max:= A[1, 1];
for i:= 1 to n do
for j:= 1 to m do
if A[i, j] > Max then
Max:= A[i, j];