Програма в Паскале.Матрица
Данная матрица целых чисел размером 4х4 поменять местами строки и столбцы этой матрицы. Вывести содержимое матрицы до обработки и после обработки.
Код:
for i:=2 to 4 do
for j:=1 to i-1 do
begin
h:=a[i,j];
a[i,j]:=a[j,i];;
a[j,i]:=h;
end;
for j:=1 to i-1 do
begin
h:=a[i,j];
a[i,j]:=a[j,i];;
a[j,i]:=h;
end;