2007/08 – Fase scolastica – 08

di

Si consideri la funzione

Function ES8(m: Integer): Integer;
Var
   a, b, c, g, t: Integer;
Begin           
   a:=m*m;
   b:=a div 2;
   c:=4*b*a;
   t:=m;
   g:=m+a+t+t+a;
   While(g < b+a+c+c+a) Do
      Begin
         g:=g+a+t+t+a;
         c:=t+a+t+a;
      End;
   ES8:=g;
end;

Dire cosa restituisce la chiamata ES8(2).

Risposte:

  1. 19
  2. 32
  3. 38
  4. nessuna delle precedenti