[PASCAL] Trasferire elementi di una matrice in un array

[giuseppe214]

ehm non ho capito potresti spiegarmelo terra terra?grazie

io ho il caricamento matrice e prima dell'ultimo end devo fare un ciclo.Come lo faccio

program trasferisci_matrice;
uses crt;
var
matrice:array[1..4,1..4] of real;
vettore:array[1..16] of real;
i,m,n:integer;
begin
for m:=1 to 4 do
begin
for n:=1 to 4 do
begin
writeln('Inserisci il ',n,' ø elemento della ',m,' colonna');
read(matrice[m,n]);
end;
end;
end.