Section courante

A propos

Section administrative du site

L'énigmatique PI et l'aire d'un cercle. Vous trouverez la réponse que vous souhaitez, à l'aide du code source Visual Basic .NET suivant :

  1. Module Module1
  2.  
  3.     Function CircleArea(ByVal r As Double) As Double
  4.         Return Math.PI * (r * r)
  5.     End Function
  6.  
  7.     Sub Main()
  8.         Console.WriteLine("l'aire d'un cercle de rayon de 1 cm est " & CircleArea(1) & "cm2")
  9.         Console.WriteLine("l'aire d'un cercle de rayon de 5 cm est " & CircleArea(5) & "cm2")
  10.         Console.WriteLine("l'aire d'un cercle de rayon de 8 cm est " & CircleArea(8) & "cm2")
  11.         Console.WriteLine("l'aire d'un cercle de rayon de 10 cm est " & CircleArea(10) & "cm2")
  12.     End Sub
  13.  
  14. End Module

on obtiendra le résultat suivant :

l'aire d'un cercle de rayon de 1 cm est 3.14159265358979cm2
l'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 : Samedi, le 22 octobre 2016