Algorithme du Nombre Parfait

Ecrire un Algorithme qui Déterminer si un nombre est  un nombre Parfait ou pas.

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.

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.

  • 7 votes. Moyenne 3.8 sur 5.

Ajouter un commentaire

Anti-spam