L'énigmatique PI et l'aire d'un cercle. Vous trouverez la réponse que vous souhaitez, à l'aide du code source Rebol suivant :
- REBOL [
- Title: "CircleArea"
- Version: 1.0.0
- Author: "Sylvain Maltais"
- Purpose: {Ce programme permet d'effectuer le calcul de l'aire d'un cercle.}
- ]
-
- CircleArea: function [r] [Result] [
- pi: 3.141592653589793
- Result: pi * (r * r)
- ]
-
- print ["l'aire d'un cercle de rayon de 1 cm est " (CircleArea 1) "cm2"]
- print ["l'aire d'un cercle de rayon de 5 cm est " (CircleArea 5) "cm2"]
- print ["l'aire d'un cercle de rayon de 8 cm est " (CircleArea 8) "cm2"]
- print ["l'aire d'un cercle de rayon de 10 cm est " (CircleArea 10) "cm2"]
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 : Dimanche, le 4 janvier 2015