Parmi les constantes mathématiques les plus célèbres et les plus mystérieuses, le nombre π (Pi) occupe une place toute particulière. Connu depuis l'Antiquité et étudié par d'innombrables mathématiciens au fil des siècles, ce nombre représente le rapport constant entre la circonférence d'un cercle et son diamètre. Sa valeur approximative de 3,141592653589793... possède une infinité de décimales et continue encore aujourd'hui de fasciner les scientifiques, les ingénieurs et les passionnés de mathématiques. Malgré sa complexité apparente, π intervient dans de nombreuses formules géométriques parmi les plus simples et les plus utiles.
L'une des applications les plus courantes de cette constante consiste à calculer l'aire d'un cercle. Cette opération est utilisée dans de nombreux domaines tels que la géométrie, l'architecture, l'ingénierie, la physique ou encore l'informatique graphique. Dès que l'on connaît la longueur du rayon d'un cercle, il devient possible de déterminer avec précision la surface qu'il occupe grâce à une formule remarquablement simple : aire = π × rayon2. Cette formule permet aussi bien de calculer la surface d'une petite pièce circulaire que celle d'un vaste réservoir ou d'une structure industrielle de forme cylindrique.
Dans les langages Delphi, Kylix et Lazarus, la constante PI est déjà définie dans les bibliothèques mathématiques, ce qui facilite grandement la réalisation de ce type de calcul. Il suffit alors de multiplier la valeur de π par le carré du rayon pour obtenir immédiatement l'aire recherchée. Cette simplicité en fait un excellent exemple pour illustrer l'utilisation des fonctions mathématiques de base dans un programme informatique.
Le programme présenté ci-dessous met en oeuvre cette formule sous la forme d'une fonction réutilisable nommée CircleArea. Celle-ci reçoit un rayon en paramètre et retourne l'aire correspondante. Afin de démontrer son fonctionnement, plusieurs exemples sont fournis avec des rayons de 1, 5, 8 et 10 centimètres. À l'aide de ce code source Delphi/Kylix/Lazarus, vous trouverez la réponse que vous souhaitez tout en découvrant l'une des applications les plus classiques et les plus élégantes de la célèbre constante π dans le domaine de la géométrie.
Vous trouverez la réponse que vous souhaitez, à l'aide du code source Delphi/Kylix/Lazarus suivant :
- Program ComputeCircleArea;
-
- {$APPTYPE CONSOLE}
- Uses Math,SysUtils;
-
- Function CircleArea(r:Real):Real;Begin
- CircleArea:=PI * (r * r);
- End;
-
- BEGIN
- WriteLn('L''air d''un cercle de rayon de 1 cm est ',CircleArea(1),'cm2');
- WriteLn('L''air d''un cercle de rayon de 5 cm est ',CircleArea(5),'cm2');
- WriteLn('L''air d''un cercle de rayon de 8 cm est ',CircleArea(8),'cm2');
- WriteLn('L''air d''un cercle de rayon de 10 cm est ',CircleArea(10),'cm2');
- END.
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