È 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,