Informatica : Code snippets

 
 Parametri  : n = Numero di cui si vuole il fattoriale
 Ritorna    : Il fattoriale di n 
 

 
 public long fattoriale(long n)
 {
     if (n == 0) // il fattoriale di 0 e' 1 per definizione !
     {
         return (1);
 
     }
     else if (n == 1) // il fattoriale di 1 e' ovviamente 1 !
     {
         return (1);
         // Ogni funzione (metodo, procedura...)
         // ricorsiva, deve avere un punto di uscita
         // in cui la chiamata a se stessa non viene eseguita
 
     }
     else
     {
         // Il fattoriale di n e' ....
 
         long res = n * fattoriale(n - 1);
 
         // La funzione richiama "se stessa" per avere il 
         // fattoriale di N-1, quindi lo moltiplica per N e
         // lo ritorna al chiamante.
 
         return (res);
 
         // Esattamente come nella definizione formale.
         // Il fattoriale di N = N * Fattoriale(N-1);
 
     } 
 } 
 
 

 
 Parametri  : n = Numero di cui si vuole il fattoriale
 Ritorna    : Il fattoriale di n 
 

 
 function fattoriale(n:integer):integer;
 begin
     if (n=0) then begin
 
         result := 1;
 
     end
     else if (n=1) then begin
 
         result := 1;
 
     end
     else  begin
 
         result := n * fattoriale(n - 1);
 
     end; 
 end;