Advertisement
Guest User

Untitled

a guest
Mar 24th, 2019
97
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.23 KB | None | 0 0
  1.  
  2. valeur_pi = 1
  3.  
  4. Ecrire ("Entrez epsilon")
  5. Lire(epsilon)
  6.  
  7. x = 3
  8. y = 1
  9.  
  10. Tant que 1/x < epsilon
  11.  
  12. valeur_pi = valeur_pi + ((-1)^y) * 1/x
  13. y = y + 1
  14. x = x + 2
  15.  
  16. Fin tant que
  17.  
  18. valeur_pi = valeur_pi * 4
  19.  
  20. Ecrire(valeur_pi)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement