2012/13 – Fase scolastica – 11

È dato il seguente programma:

Program E11(Input, Output);
Function f (i: Integer): Integer;
Begin
   If(i <= 1) Then
      f:=i
   Else If(i Mod 2 = 0) Then
      f:=-i*f(i-1)
   Else
      f:=i*f(i-1)
End;
Begin
   Write('num = ', f(7))
End.

Cosa viene visualizzato a video dall’esecuzione del programma?