2000/01 – Fase scolastica – 04

Determinare T e X in modo tale che il programma renda uguali a 0 gli elementi delle due diagonali di una matrice quadrata A di nxn interi.

For i:=1 To n Do
   Begin
       A[i, T]:=0;
       A[i, X]:=0
   End;

Ad esempio

A={{1, 2, 3, 4}, {2, 3, 4, 5}, {3, 4, 5, 6}, {3, 4, 5, 8}};

deve diventare

A={{0, 2, 3, 0}, {2, 0, 0, 5}, {3, 0, 0, 6}, {0, 4, 5, 0}};