Работа с матрицей (Pascal)

[Саюри]

В матрице М(5,5) определить местоположение единственного нулевого элемента и если для него i>j, то переставить i-ую строку с j-ым столбцом. Иначе i-ую строку и j-ый столбец сделать одинаковыми ориентируясь на меньший индекс.

В принципе задачу понимаю, но как записать в Pascal не понимаю((( Помогите пожалуйста

[ZX Spectrum-128]

В матрице М(5,5) определить местоположение единственного нулевого элемента

Если он точно единственный

For i:=1 to n do
For j:=1 to n do
 If M[i,j]=0 then
  Begin
    Nstroki:=i;
    Nstolbtsa:=j;
  End;