È dato il seguente programma:
Program E11(Input, Output);
Function sfatt(i: Integer): Integer;
Begin
if(i <= 1) Then
sfatt:=i
Else If (i Mod 2 = 0) Then
sfatt:=i*sfatt(i-1)
Else
sfatt:=i*sfatt(i-2)
End;
Begin
Write ('num = ', sfatt(7))
End.
Cosa viene visualizzato a video dall’esecuzione del programma?