È dato il seguente programma:
Program E7(Input, Output);
Var
f: Array[1..10] Of Integer;
i: Integer;
Begin
f[1]:=5;
f[2]:=3;
For i:=1 To 8 Do
f[i+2]:=f[i]-f[i+1];
For i:=1 To 10 Do
Write(f[i], ', ')
End.
Cosa viene visualizzato a video dall’esecuzione del programma?
- 5, 3, 2, 1, 1, 0, 1, -1, 2, -3,
- 5, 3, 2, 1, 1, 1, 0, -1, 2, -3,
- 5, 3, 2, 1, 1, 0, 0, -1, 2, -3,
- 5, 3, 2, 1, 1, 0, 1, -1, -2, -3,