Principe : Un nombre égal à la somme de ses diviseurs propres est parfait.
Exemple :6 Est Parfait car en effet 1, 2 et 3 sont les diviseurs propres de 6 et la somme de 1+2+3 = 6.
Voir le corrigéMasquer le corrigé
CORRECTION
Algorithme NombreParfait;
var nbre,cpt,i: entier;
Début
répéter
ecrire('Entrez un nombre qui sera testé: ');
lire(nbre);
jusqu’à(nbre>=0);
cpt<-0;
pour i de 1 à (nbre div 2)faire
si(nbre mod i =0)alors
cpt<-cpt+i
fsi
fpour
si(cpt=nbre)alors
ecrire('Ce nombre est parfait')
sinon
ecrire('Ce nombre n est pas parfait');
fsi
Fin.
Questions / Réponses
Aucune question. Soyez le premier à poser une question.