Как найти в двумерном массиве наибольшее число этого массива? Паскаль(

Объявляем массив a[NxM], maxv - максимальное значение
...
for I := 1 to n do
  for j := 1 to m do
    maxv := max(maxv, a[I,j]);
writeln(maxv);