Discussion :

[WESTSIDE]

Bonjour, je suis débutante avec turbo pascal et je fais les exercices de Jean-Michel Bernabotto dans la partie cours du site néanmoins je suis coincée par l'un d'eux:
9°) Calculer la somme des entiers pairs compris entre 1 et N.(facultatif)
J'ai resolus le precedent
8°) Calculer la somme des entiers compris entre 1 et N.
Mais je n'arrive pas à l'adapter car je ne vois pas comment trouver que le snombres pairs...
Si quelqu'un peu m'aider car je supose que c'est tres simple !
Merci d'avance

[krachik]

Bonjour et bienvenue

Mais je n'arrive pas à l'adapter car je ne vois pas comment trouver que le snombres pairs...
Si quelqu'un peu m'aider car je supose que c'est tres simple !

Alors un indice comment ut fais pour savoir si un nombre est paire?
Quand tu compte les nombres pârtant de 0 2 à 2 on parle de quoi?
voila une piste quand tu aura trouvé tu vera aussi qu'il y a un fonction de Pascal pour savoir si un nombre est pair
@+

[WESTSIDE]

pour savoir si un nombre est paire il faut voir s'il est divisible par deux j'ai testé avec la fonction Mod apres avec une structure en if j'ai essayé de l'integrer a la boucle mais ca ne colle pas quand je teste e programme

[krachik]

Dans ce cas il faut voir le type de boucle qui est adapté et compter 2 à 2,
tu pense à quel(les) boucle(s) la?
ou bien tu nous montre ton code et on vera ce qui ne va directement

[WESTSIDE]

Pour le programme précédent sans les nombres pairs j'ai fait ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Begin
Clrscr;
Write('donnez valeur pour n ')
readln(N);
Somme:=0
For I:=1 to N do
Somme:=Somme+I;
Writeln(' la somme est ...')
End

voila en un peu epuré juste le corp du programme

[krachik]

Pour mettre tes codes utilises les balises code (c'est # dans l'editeur) ou encadre ton codes pas par (code /code encadré par des crochets)

Remarque ascal ne respecte pas la casse donc les miniscule ou majuscule pour les mots clé ne jouent pas(mais ta presentation est bonne reste plus qu'a indenter ton code et le rendre clair) ,ça c'est bon
mais pour les nombres pairs tu as quoi à proposer,
etablis un algo qui poura resoudre l'exercice qu'on t'a donné et apres passe au code.je t'ai deja donné des indices,relis bien mes reponses precedentes

[WESTSIDE]

J'ai pensé à àa en algo

Code algo :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
On pose V1=1 et V2=2
Pour I allant de I à N
  SI V2=I 
  Alors 
    V2=V2+2
  Sinon 
     SI V1=I
    Alors  V1=V1+2
    FINSI
  FINSI
FIN POUR

Desolée si ce n'est pas très lisible

[krachik]

t'a pas relu mes reponses precedentes.........
ton algo ne tiens pas la route une seule seconde,avoir ça on dirait que les nombres de ce monde ne peuvent etre que des 1 ou des 2. et si tu utilise une boucle 'for il te faut une condition alors que avec les autres boucles non

tiens:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
    Somme <----0
    Pour I Allant de 1 à N
         Si (I Modulo 2 = 0)
             Somme <--- Somme +I
         FinSI
    FinPour

t'es Ok avec moi?

[WESTSIDE]

A ok en fait me suis trop ecarté du probleme et vu que je n'arrivais pas a utiliser la fonction mod je l'ai laissé tombé mais donc la tu m'a maché le travail!lol
En fait je n'ai pas a utilisé le coté impair comme je le faisait dans mon algo

Me reste plus qu'a traduire ca en pascal !
Merci beaucoup pour ton aide et surtout pour m'avoir fait comprendre la fonction modulo
Je me remettrai demain sur tout ça encore merci

[krachik]

tu peux aussi le faire avec une boucle while ou repeat until
Il y a des solutions qui sont plus optimales que d'autres c'est à toi de voir
traduis celle la et on vera,si t'a d'autres question n'hesites pas a revenir

@+