2009/10 – Fase scolastica – 05

Si consideri il seguente frammento di programma:

Var
   M: Array [1..3,1..3,1..3] Of Integer;
   i, j, k: Integer;
Begin
   For i:=1 To 3 Do
      For j:=1 To 3 Do
         For k:=1 To 3 Do
            M[i,j,k] := i+k-2;
   For i:=1 To 3 Do
      Begin
         For k:=1 To 3 Do
            For j:=1 To 3 Do
               Write(' ', M[i,j,k]);
            Writeln()
      End
End.

Quale tra i seguenti insiemi di valori viene visualizzato a video dall’esecuzione di main()?

Risposte:

  1. 0 0 0
    1 1 1
    2 2 2
    1 1 1
    2 2 2
    3 3 3
    2 2 2
    3 3 3
    4 4 4
  2. 0 0 0 1 1 1 2 2 2 1 1 1 2 2 2 3 3 3 2 2 2 3 3 3 4 4 4
  3. 0 0 0 1 1 1 2 2 2
    1 1 1 2 2 2 3 3 3
    2 2 2 3 3 3 4 4 4
  4. 0 0 0 1 1 1 2 2 2
    0 0 0 1 1 1 2 2 2
    0 0 0 1 1 1 2 2 2