Задачка в паскале на матрицы

[Марик]

Написать прогу предназначенную для определения максимального элемента целочисленнои матрицы М(5;4) и номеров строки и столбца,на пересечении кот. они находятся.

[eoln]

Задача типовая - на форуме легко найти подобные

...
str:=1;
stolb:=1;
max:=mas[1,1];
for i:=1 to 5 do for j:=1 to 4 do
  if mas[i,j]>max then
  begin
    str:=i; //номер строки
    stolb:=j;  //номер столбца
    max:=mas[i,j]
  end;
...

[Марик]

Спасибо получилось