matrice11

(* inserimento valori in matrice con Input *)

(* matrice 2 per 2 *)

(* ciclo DO richiesta dati e ciclo DO stampa *)

(* stampa singolo elemento *)

Do[a[i,j]=Input["intero="],{i,2},{j,2}]

Do[Print[a[i,j]],{i,2},{j,2}]

a[1,1]

3

3

3

4

5

6

ritorna a inizio