Nombre premier
Résolu
ghizl01
Messages postés
3
Date d'inscription
Statut
Membre
Dernière intervention
-
Sacabouffe Messages postés 9427 Date d'inscription Statut Membre Dernière intervention -
Sacabouffe Messages postés 9427 Date d'inscription Statut Membre Dernière intervention -
Bonjour,j'arrive plue à resoudre cet exercice s'il vous plait aidez moi
ecrire un algorithme qui permet de lire un nombre et de trouver le plus petit nombre premier strictement supérieur à ce nomdre donné
ecrire un algorithme qui permet de lire un nombre et de trouver le plus petit nombre premier strictement supérieur à ce nomdre donné
A voir également:
- Nombre premier
- Nombre de jours entre deux dates excel - Guide
- Nombre facile - Télécharger - Outils professionnels
- Ascii nombre de caractères - Guide
- Gto nombre episode ✓ - Forum Cinéma / Télé
- Faites afficher avec un fond coloré les cellules qui contiennent une valeur comprise entre 250 et 350. quel nombre est dessiné en surbrillance ? ✓ - Forum Excel
4 réponses
ghizl01
Messages postés
3
Date d'inscription
Statut
Membre
Dernière intervention
merci mon ami mais comment faire?
voila ce ke jé fait et je sait pas si c'est vrai ou faux:
dim n,m,j
n=inputbox("donner un nbre")
for j=1 to n
m=n+j
if premier(m)=true then
msgbox (m & " est premiere")
end if
next
'function premier (n)
function premier (x)
dim i
for i=2 to x-1
if x mod i=0 then
premier=false
exit function
end if
next
dim n,m,j
n=inputbox("donner un nbre")
for j=1 to n
m=n+j
if premier(m)=true then
msgbox (m & " est premiere")
end if
next
'function premier (n)
function premier (x)
dim i
for i=2 to x-1
if x mod i=0 then
premier=false
exit function
end if
next