Somme des chiffres d'un nombre entier donné

Essayer d'écrire un programme Pascal, plus précisément une fonction, qui calcule la somme des chiffres d'un nombre entier positif donné.

Exemple:
X = 1952
Somme des chiffres de X = 1+9+5+2 = 17

Il existe plusieurs méthodes. Une d'elles est très astucieuse.

Salut,
C'est le meme esprit que l'exercice chiffre chance d'un nombre entier
Sauf là on fait un seul appel à la fonction SomChiffres

C'est un classique cet exercice il est simple et peut-être résolu par différentes méthodes.

Si vous trouvez le temps, développer les différentes idées "solutions" de cet exercice.

L'une avec l'opérateur "MOD" et l'aurte avec les fonctions STR et VAL.
Je pense que celle du MOD est la plus astucieuse!