Calcul de la somme der entier

Résolu
Bonjour,
je suis debutant dans la programation et j ai un probleme. voici l enonce ecrire un program qui calcul la somme der entier naturel.merci pour l aide
Configuration: Windows XP
Internet Explorer 6.0

5 réponses

  1. Ehoh ! Va te faire voir chez les grecs toi ! :-DDD
    Tu m'excuseras, j'ai supprimé ton message 2 hier, tu donnais bille en tête la solution.
    Il y a beaucoup trop de personnes qui viennent ici pour faire faire leurs exos/devoirs/projets/etc, et qui attendent lamentablement la solution, du coup maintenant, je m'assure que les personnes cherchent un peu au cas où elle l'auraient pas fait avant, tout au moins quand je suis à peu près sûr qu'il s'agit d'un devoir.
    Bonne nuit

    PS : Évite le SMS s'il te plaît ;-)
    1
    1. Bonne idée j'avais pas pensé a sa!!!
      0
  2. Salut
    Montre-nous ce que t'as déjà fait
    Ciao
    0
    1. program summe;
      var summe,z,n:integer;
      begin
      summe:=0;
      write('doner un nombre');
      readln(z);
      n:=n+1;
      if n mod 2 then
      summe=Summe+n;
      writeln(summe);
      end.
      0
  3. Il faut que tu fasses une boucle for pour incrémenter n fois la somme de 1, sinon ça marche pas.
    0
    1. merci, j ai esaie de faire un autre je te le montre et tu me dira si c est juste
      program
      var c,m,n,z: integer;
      begin
      write(donne un nombre);
      readln(z);
      n:=z;
      m:=z+1;
      c:=n*m div 2;
      writeln('summe:',c);
      end.
      0
  4. Ah OK !
    T'utilises la formule Σ p = n(n+1)/2, c'est effectivement ce qu'il y a de mieux mais peut-être que le but de l'exercice était de vous faire faire une boucle :-D
    Sinon oui, c'est ça...
    Par contre la prochaine fois que tu postes, pense à dire que tu codes en Turbo Pascal. Si c'est un truc compliqué, j'interviendrai pas, je connais pas le langage et je servirai à rien. Là ça va que c'était un truc simple... :-)
    0
    1. Ne pas connaitre Turbo pascal kel honte!!!POur un moderateur
      PASCAL 4ever
      0