Exercice (procédure diviseurs ())
Ecrire une procédure permettant de compter le nombre de diviseurs d’un nombre entier passé en
paramètre, puis les afficher du plus grand au plus petit.
Code:
Variable x : EntierDébutAfficher ( "entrez le nombre positif" )Saisir ( x )diviseur ( x )Finprocédure diviseur ( x : Entier )Variable k , b , c : EntierVariable y : Chaîne <- ""Débutc <- 0Pour b <- 1 à x Pas 1Si Modulo ( x , b ) = 0 Alorsc <- c + 1FinSiFinPourPour b <- 1 à x Pas 1k <- x / bSi Modulo ( x , b ) = 0 AlorsSi y = "" Alorsy <- y & kSinony <- y & " , " & kFinSiFinSiFinPourAfficher ( " Le nombre de diviseurs de " & x & " est : " & c )Afficher ( "Les diviseurs de " & x & " par ordre décroissant : " & y )Fin
Télécharger:




0 تعليقات البلوجر