[pascal] valeur approchée de pi

Bonjour,
je dois ecrire un programme pascal qui permet de caluler puis d'afficher une valeur approchée de pi a 10^(-4)près à partir de l'expression: pi/4 = 1 - 1/3 + 1/5 - 1/7 + 1/9 ..... ; (le calcul s'arrete quand la difference entre 2 valeur consécutives de cette expression devient strictement inferieur à 10^(-4)..
merci pour votre aide
a+
Configuration: Windows XP
Firefox 2.0.0.6

3 réponses

  1. Bonjour,

    Je crois qu'il s'agit d'une suite: pi=4* somme (-1)
    1. non non,,c'est vrai qu'il s'agit d'une suit mais la problem c de signe (-) aprés chaque 2 instruction de cette suite
    2. quand est ce qu'on fait s:=0 et s:=1 dans le programme pascal
  2. PI=4*somme(0 à infini)((-1)puiss(n)/ (2*n+1))

    Je n'ai pas pu écrire l'equation entièrement...

    En utilisant des boucles pour incrementer n et réaliser la somme et des test "si" à l'interieur de ta boucle d'incrementation je penses que tu

    peux trouver une solution...Bon courage...
    1. program pi;
      uses wincrt;
      var
      k:integer;
      n:integer;
      somme:real;
      begin
      read(n);
      somme:=0;
      for k:=0 to n do
      somme:= somme + (1div(2*k+1))* exp(k*ln(-1));
      pi:= 4*somme;
      end.
  3. bonjour
    ok

    begin
    x:=1;
    i:=3;
    repeat
    xpre:=x;
    x:=xpre-1/i;
    i:=i+1;
    until(4*(x-xpre)<eps);
    end;
    1. l'icrementation de i sera i:= i+2 pas ;
      et until abs (x-xpres )<eps;