Все те же матрицы........

[narco3]

Уважаемые прошу вашей помощи.Никак не могу понять как вот поменять местами в квадратной матрице елементы: тройки поменять с двойками!!!(и еще не известен размер матрицы)
10001
21013
22133
21013
10001
Заранее благодарен

[NetSpace]

как не известен? матрица у Вас 5x5.
поэтому идём по всем пяти строкам и перебираем в каждой все 5 элементов и заменяем двойки на тройки и тройки меняем на двойки.
пусть ваш массив имеет имя sur[1..5,1..5]of Integer;

for f:=1 to 5 do for k:=1 to 5 do
begin
   count:=count+1;
   if(sur[f,k]=2)then
   begin
       count:=count+1;
       if(count=1)then sur[f,k]:=3;
    end;
   if(sur[f,k]=3)then
   begin
        count:=count+1;
        if(count=1)then sur[f,k]:=2;
   end;
   count:=0;//обнуляем счётчик
end;

[Mandrivnyk]

for (int i = 0; i < rownumber; i ++)
    for (int j = 0; j < columnnumber; j++)
        switch (Array[i][j])
        {
             case 2: 
                Array[i][j] = 3;
                break;
             case 3: 
                Array[i][j] = 2;
                break;
         }
    }
}

[narco3]

Я извиняюсь, но как быть если размер задается пользователем?А задача то : поменять местами елементы которые находятся ниже главной и выше побочной диаг. с елементами которые находятся выше главной и ниже побочной.