Вывести на экран только,те эл. многомерного массива,которые делятся на 3

Ну-с, массив сам введешь и поменяешь название массива тут.N и M размерность матрицыfor i:=1 to n  begin    for j:=1 to m      begin        if(mas[i,j] mod 3 = 0) then        write(mas[i,j]:2);      end;  end;