algorithme factoriel

Exercice:
Établir l'algorithme qui permet de calculer le factoriel  d'un nombre entier.
Exemple:le factoriel de 4 premier nombre est  : 4*3*2*1=24
Solution:
Algo factoriel
Début
         var a,i,fact :entier
         lire("veuillez entrer une valeur: ",a)
         s <-- 1
         i <-- 1
         répéter
         s <-- s*i
         i <-- i+1
         jusqu'a (n<i)
         afficher("le factoriel est ",fact)
Fin