Amusant pour certain, calculer l'air d'une surface de prisme rectangulaire. Vous trouverez la réponse que vous souhaitez, à l'aide du code source Visual Basic .NET suivant:

Module Module1     Function RectangularPrismSurfaceArea(ByVal h As Double, ByVal w As Double, ByVal l As Double) As Double         Return (2 * h * w) + (2 * h * l) + (2 * l * w)     End Function     Sub Main()         Console.WriteLine("L'air d'une surface de prisme rectangulaire de 10x5x5 est " &RectangularPrismSurfaceArea(10, 5, 5) &"cm2")         Console.WriteLine("L'air d'une surface de prisme rectangulaire de 2x3x4 est " &RectangularPrismSurfaceArea(2, 3, 4) &"cm2")         Console.WriteLine("L'air d'une surface de prisme rectangulaire de 1x3x7 est " &RectangularPrismSurfaceArea(1, 3, 7) &"cm2")     End Sub End Module

on obtiendra le résultat suivant:

L'air d'une surface de prisme rectangulaire de 10x5x5 est 250cm2 L'air d'une surface de prisme rectangulaire de 2x3x4 est 52cm2 L'air d'une surface de prisme rectangulaire de 1x3x7 est 62cm2