L'énigmatique PI et l'aire d'un cercle. Vous trouverez la réponse que vous souhaitez, à l'aide du code source REXX suivant :
- SAY "l'aire d'un cercle de rayon de 1 cm est " || CircleArea(1) || "cm2"
- SAY "l'aire d'un cercle de rayon de 5 cm est " || CircleArea(5) || "cm2"
- SAY "l'aire d'un cercle de rayon de 8 cm est " || CircleArea(8) || "cm2"
- SAY "l'aire d'un cercle de rayon de 10 cm est " || CircleArea(10) || "cm2"
- EXIT
-
- CircleArea :Procedure
- Arg r
- PI = 3.14159265358979323
- Return PI * (r * r)
on obtiendra le résultat suivant :
l'aire d'un cercle de rayon de 1 cm est 3.14159265358979cm2l'aire d'un cercle de rayon de 5 cm est 78.5398163397448cm2
l'aire d'un cercle de rayon de 8 cm est 201.061929829747cm2
l'aire d'un cercle de rayon de 10 cm est 314.159265358979cm2
Dernière mise à jour : Lundi, le 10 novembre 2014