Ecrire une fonction qui retourne la factorielle d'un nombre.
Solution : Voir le fichier Facto.pas
Remarque :
- Le type de retour de la fonction est Longint (entier long) pour nous permettre de
calculer la factorielle de nombres supérieurs à 8. En effet, les entiers étant codés sur 16 bits, ils
sont compris entre -32768 et 32767, or 8! = 40320, il y'a donc débordement et nous obtenons une
valeur négative qui est réalité -32768 + (40320 - 32767) - 1 soit -25216 (en fait, 32767+1 = -32768
d'après l'arithmétique des entiers signés).
Déduire de la solution précédente, une fonction qui permet le calcul de la combinaison de p
dans q définie par : Comb(p, q)=q!/(p!*(q-p)!) ensuite construire le triangle de Pascal
en prenant en entrée le nombre de lignes à afficher.
Solution : Voir le fichier Tpascal.pas
|