двумерный массив

[caught.let]

написать программу программу выводящие на экран индексы элементов двумерного массива кратных 3 ( сам двумерный массив писать необязательно)

[weech]

for i:=1 to n do
  for j:=1 to m do
   if a[i,j] mod 3 = 0 then
       writeln(i,'x',j);