CONNEXION
  • RetourJeux
    • Sorties
    • Hit Parade
    • Les + populaires
    • Les + attendus
    • Soluces
    • Tous les Jeux
    • Gaming
  • RetourActu Gaming
    • News
    • Astuces
    • Tests
    • Previews
    • Toute l'actu gaming
  • RetourBons plans
    • Bons plans
    • Bons plans Smartphone
    • Bons plans Hardware
    • Bons plans Image et Son
    • Bons plans Amazon
    • Bons plans Cdiscount
    • Bons plans Decathlon
    • Bons plans Fnac
    • Tous les Bons plans
  • RetourJVTech
    • Actus High-Tech
    • Intelligence Artificielle
    • Smartphones
    • Mobilité urbaine
    • Hardware
    • Image et son
    • Tutoriels
    • Tests produits High-Tech
    • Guides d'achat High-Tech
    • JVTech
  • RetourCulture
    • Actus Culture
    • Culture
  • RetourVidéos
    • A la une
    • Gaming Live
    • Vidéos Tests
    • Vidéos Previews
    • Gameplay
    • Trailers
    • Chroniques
    • Replay Web TV
    • Toutes les vidéos
  • RetourForums
    • Hardware PC
    • PS5
    • Switch 2
    • Xbox Series
    • Switch
    • Pokemon pocket
    • FC 25 Ultimate Team
    • League of Legends
    • Tous les Forums
  • PC
  • PS5
  • Xbox Series
  • Switch 2
  • PS4
  • One
  • Switch
  • iOS
  • Android
  • MMO
  • RPG
  • FPS
En ce moment Genshin Impact Valhalla Breath of the wild Animal Crossing GTA 5 Red dead 2
Liste des sujets

programme sur Visual Basic

xxt3
xxt3
Niveau 8
12 octobre 2009 à 21:45:53

Bonsoir.

Est ce que quelqu'un pourrait m'aider à faire un programme sur VB pout trouver la somme des nombres premiers de 0 à N (ou N est une variable écite par l'utilisateur)??

Merci beaucoup.

melanie-du-19
melanie-du-19
Niveau 10
12 octobre 2009 à 21:51:14

Je connais pas le VB, mais pour l'algo:

somme: entier
i: entier
somme <- 0
lire (N)
pour i de 1 à N faire
N <- N+1
fin faire, fin pour
écrire(somme) ( en option )

melanie-du-19
melanie-du-19
Niveau 10
12 octobre 2009 à 21:51:47

N: entier ù

melanie-du-19
melanie-du-19
Niveau 10
12 octobre 2009 à 21:52:29

N: entier
somme: entier
i: entier
somme <- 0
lire (N)
pour i de 1 à N faire
somme <- somme+1
fin faire, fin pour
écrire(somme) ( en option )

c'est mieux :o))

xxt3
xxt3
Niveau 8
12 octobre 2009 à 22:25:43

Merci ca m'aide!

Mais j'ai pas compris le truc somme<-0

Fringe
Fringe
Niveau 10
12 octobre 2009 à 22:42:21

Bah il donne une valeur de départ à la variable somme. :(

xxt3
xxt3
Niveau 8
12 octobre 2009 à 23:04:53

ok ca ca va mais ca fait la somme de tout les nombres, pas seulement des nombres premiers no?

Fringe
Fringe
Niveau 10
12 octobre 2009 à 23:05:33

Exact. :(

xxt3
xxt3
Niveau 8
12 octobre 2009 à 23:12:29

c'est ca mon probleme.

melanie-du-19
melanie-du-19
Niveau 10
12 octobre 2009 à 23:52:41

Ah ouè désolé j'ai mal lu...

Ca doit être ça normalement : (Y'a plusieurs méthodes, j't'en donne une)

Le := c'est l'affectation ( c'est <- )

X c'est ton N
div c'est le nombre de diviseur de X
somme, c'est la somme des entiers premiers jusqu'à X
prem c'est un booléen qui vaut vrai si l'entier testé est premier faux sinon.

début

div:=0
somme:=0
prem:=false

lire(X)

Pour n de 1 à X faire

:d) pour i de 1 à n faire
si n mod i = 0 alors
div:=div+1
fin si
fin pour

:d) si div=2
alors prem:=true
sinon prem:=false
fin si

:d) si prem=true
somme:=somme+n
fin si

fin pour

ecrire (somme)

fin

Le paragraphe de la première fleche determine le nombre de diviseur de l'entier courent

Le second détermine si l'entier est premier

Le troisième fait la somme si l'entier est premier

Sous forums
  • Métiers & Orientation
  • Histoire
  • Politique
  • Cours et Devoirs
  • Environnement & Nature
  • Philosophie
La vidéo du moment