Question

Cum citesc cel mai simplu o matrice patratica, in limbajul pascal?

Answer 1

Program HelloWorld;
var
  i,j,n:integer;
  matrice: array of array of integer;
begin  
  readln(n);
  SetLength(matrice, n, n);
  for i:=0 to n-1 do
    for j:=0 to n-1 do  
      readln(matrice[i,j]);
     
  for i:=0 to n-1 do
    for j:=0 to n-1 do  
      write(matrice[i,j]);
end.

Explicatie: prima data declari o i,j,n si o matrice bidimensionala
apoi, citesit n-ul, apoi setezi dimensiunea matricei(sau ii) la n*n, apoi, incepi un for, care ia fiecare linie a matricii, si inca un for care ia fiecare spatiu de pe linie, si citesti numere de la tastatura in matrice... Apoi, faci acelasi lucru ca sa le afisezi...