Pascal/Turbo Pascal - Matriz traspuesta (sin usar matriz auxiliar)

Hola, me gusta este foro!

Mi pregunta es: ¿existe alguna manera de generar la Traspuesta de una matriz sin usar una matriz auxiliar? Es decir, ¿Puedo hallar la traspuesta de una matriz sobre sí misma?

Gracias por la ayuda!!

No veo ningún problema en ello :S.

Solo tienes que imitar en la computadora lo que haces a mano.

Vaya, gracias por su respuesta!

Pero, no consigo implementarlo, no se me ocurre. Con una matriz auxiliar si, pero de esta forma... no.

cargas normal la matriz la imprimes y despues imprimes esta:

procedure impri (var matriz:ar_matri);
var
I,K: integer;
begin
for K:=1 to colum do
begin
for I:=1 to fila do
begin
write (matriz[I,K]:5);
end;
writeln;writeln;writeln;
end;
end;