Discussion :

[mikoeur]

salut tous
j'essais de faire un proramme qui trouve les decimals de pi ,mais je suis limité par le fait que turbo se limite à un nombre fini de decimales . y at-il un moyen de contourner le probleme pour avoir le plus possible de decimales?

[M.Dlb]

Pour les nombres avec beaucoup de décimales, on peut utiliser le type extended qui peut contenir jusqu'à 20 chiffres je crois. Attention coprocesseur arithmétique requis ( inclus dans les pentiums ) !!
N'oubliez pas non plus d'ajouter en début de votre programme la directive {$N+}, pour pouvoir utiliser le coprocesseur.
a+

[mikoeur]

non pas variment c'est pas exactement ce que je cherche. Je voudrais avoir autant de décimales que je veux, faire un programme qui qui trouve les décimales une à une, mais autant que je veux veux.

[haypo]

Il faut faire du calcul sur de grands nombres entiers :
http://www.haypocalc.com/grandnbr/

Il existe un algorithme simple à implémenter : le calcul "goute à goute". Il fourni les décimales de PI l'un après l'autre.

Quelques formules pour calculer PI (sans explication, page que j'ai écrite vite fait, juste pour moi) :
http://www.haypocalc.com/tmp/calcul_pi.php

L'univers de PI :
http://membres.lycos.fr/bgourevitch/

(cherche sous google avec "calcul pi" par ex)

Si tu charges toutes mes sources TP, tu trouveras un fichier TP\Source\Math\Calc_Pi.pas qui calcule PI. C'est du calcul sur de grands nombres entiers :
http://pascal.developpez.com/ProgTP_Haypo.zip

@+ Haypo

[mikoeur]

merci beaucoup

[lvdnono]

Juste a titre d'info j'en ai fait un a titre d'eesai il y un ans et je sais que j'était arrivé à 18 décimales ... Mais je te rassure le pascal n'est pas l'idéal pour calculer PI ! Au juste quelle formule utilise tu ( ou plutôt algorythme ) ;

Moins j'ai trouvé sans aide 2 formules avec la quadrature et l'autre avec Pythagore ! Les autres je les ai lu dans un bouquin !!!

A +

Signez : A Master of PI 3.1415....

[M.Dlb]

Pythagore ??
Comment on calcule Pi avec Pythagore ??

a+

[mikoeur]

une formule que j'ai trouvé qui converge super vite :
a(n+1)=-i*((4-a(n))²^(1/2)-2)^(1/2)
a1=racine(2)
b(n+1)=a(n)*2^(2n+1)
b1=1

[lvdnono]

Coucou

Je m'explique ; on fait un polygone et on trace a chaque fois les mediatrice....[....].... jusqu'à s'approcher du cercle ... Ceci s'appelle la quadrature du cercle . Ensuite avec un simple raisonnement par récurrence on obtien

r(n+1) = Racine ( 2 - 2 racine 1 - (Rn+1 / 4 ) ) ;
Pi = 2 ^ n+1 * r(n+1 ) ;

Il suffit juste de savoi que R0 = 2 ....

C'est plus clair

Oui

Allez
A +

Bruno

[mikoeur]

Mais le probleme de cette formule c'est qu'on utilise pas des nombres entiers comme je le voudrais. J'en ai donc chercher une autre sur un des sites que propose Haypo. Le truc c'est que j'ai souvent un message d'erreur : overflow qqch...Je crois qu les nombres sont trop grands pourtant j'ai utilisé {$N+}...

[lvdnono]

Pour te rassurer mon programme utilise les arcs tangentes car
c'est plus pratique ! Vive les gens qui se sont creuser la tête pour que moi je n'ai plus qu'a recopie ! Sinon quand tu l'as fini ... Mets le dans les contribs ou envoie le moi par e -mail !!! Merci d'avance !!!

A +

[mikoeur]

ok pas de probleme.

[lvdnono]

Merci beaucoup

A + ou - 3.1415... décimale

Bruno