Posté par
infophile infophileBonjour
MatOfScience
Voilà mon code si ça t'intéresse :
Citation :
chiffre:=proc(n) local i,s,a,c;
c:=floor(ln(n)/ln(10))+1;
s:=0;
for i from 1 to c do
a:= floor(n/10^(i-1)) mod 10;
s:= s+a;
od;
end;
test:= proc(a, b) local i;
for i from a to b do
if chiffre(i^3) = i then print(i) fi;
od;
end proc;
test(2,1000);
J'ai écrit deux procédures, une
chiffre qui calcule la somme des chiffres d'un nombre donné et
test qui effectue la boucle balayant les entiers de 2 à 1000 en - comme son nom l'indique - testant si le nombre entré vérifie la propriété voulue.
Si tu as des questions n'hésite pas
