2013/14 – Fase scolastica – 08

È dato il seguente programma:

Program E8(Input, Output);
Var
   i, j: Integer;
Function max (a, b: Integer): Integer;
Begin
   If(a > b) Then
      max:=a
   Else
      max:=b
End;
Function f(a, b: Integer): Integer;
Begin
   If(a = 0) Then
      f:=b
   Else
      f:=max(f(a-1, 2*b), f(a-1, 2*b+1))
End;
Begin
   Write(' ', f(8,0))
End.

Cosa viene visualizzato a video dall’esecuzione di main()?