S_fact : calculer dans la variable fact la factorielle
d'un nombre n positif et quelconque.
Ecrire trois versions de ce calcul avec
chacune des boucles étudiées: for, loop
et while. Pour chaque boucle étudier:
i:= 0; while i <= n loop i := i + 1; somme := somme +i; end loop;
i:= 1; while i <= n loop i := i + 1; somme := somme +i; end loop;
i:= 0; while i <= n loop somme := somme + i; i := i + 1; end loop;
i:= 0; loop i := i + 1; exit when i >= n; somme := somme + i; end loop;
i:= 1; loop somme := somme + i; i := i + 1; exit when i >= n; end loop;