È dato il seguente programma:
Program E9(Input, Output);
Var
vett: Array[0..9] Of Integer;
i : Integer;
Procedure scambia(Var a, b: Integer);
Var
c: Integer;
Begin
c:=a;
a:=b;
b:=c
End;
Begin
For i:=0 To 9 Do
vett[i]:=i;
For i:=9 DownTo 0 Do
scambia(vett[i], vett[i Mod 3]);
For i:=0 To 9 do
Write(' ', vett[i]);
End.
Cosa viene visualizzato a video dall’esecuzione del programma?