2001/02 – Fase scolastica bis – 07

Considerate il seguente frammento di programma Pascal:

Type
   s=Set Of 0..100;
Var
   x, y, z: s;
   i      : 0..100;
Begin
   x:=[3, 4, 5, 6];
   y:=[1, 2, 3, 4];
   z:=x*y;
   For i:=0 To 100 Do
      If(i In z) Then Writeln(i)
End.

Quali valori vengono stampati?

  1. sono stampati nell’ordine: 3 4 5 6 8 10 12 9 12 15 18 12 16 20 24
  2. sono stampati nell’ordine: 3 4
  3. sono stampati nell’ordine: 1 2 3 4 5 6
  4. sono stampati nell’ordine: 3 4 5 6 8 9 10 12 15 16 18 20 24
  5. nessuna delle precedenti risposte è corretta.