Exercice 4 Procédures et Fonctions Corrigé
Ecrire un algorithme affichant tous les nombres inférieurs à 500 égaux à la somme des cubes de leurs chiffres. On utilisera une fonction UNITE, et une fonction CUBE.
Exemple : 153 = 13 + 53 + 33 = 1 + 125 + 27
Algorithme SommeCube ;
Var A,B,S :entier ;
Fonction Unite(X :entier) :entier ;
Debut
Unite ← X mod 10 ;
Fin ;
Fonction Cube(X :entier) :entier ;
Debut
Cube ← X*X*X ;
Fin ;
Debut
Pour A← 0 à 500
Faire
S← 0; B ← A;
Repeter S← S + Cube(Unite(B)); B ← B div 10 Jusqu’à B=0;
Si S=A Alors Ecrire(A,’ est égale à la somme des cubes de ses chiffres’) Fsi ;
Fait ;
Fin .
Ajouter un commentaire
Veuillez vous connecter pour ajouter un commentaire.
Pas encore de commentaires.