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 DarkBASIC suivant:

PRINT "L'air d'une surface de prisme rectangulaire de 10x5x5 est ";RectangularPrismSurfaceArea(10, 5, 5);"cm2" PRINT "L'air d'une surface de prisme rectangulaire de 2x3x4 est ";RectangularPrismSurfaceArea(2, 3, 4);"cm2" PRINT "L'air d'une surface de prisme rectangulaire de 1x3x7 est ";RectangularPrismSurfaceArea(1, 3, 7);"cm2" WAIT KEY FUNCTION RectangularPrismSurfaceArea(h, w, l)     ReturnValue# = (2 * h * w) + (2 * h * l) + (2 * l * w) ENDFUNCTION ReturnValue#

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