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 GFA-Basic suivant:

Print "L'air d'une surface de prisme rectangulaire de 10x5x5 est " + Str$(@RectangularPrismSurfaceArea(10, 5, 5)) + " cm2" Print "L'air d'une surface de prisme rectangulaire de 2x3x4 est " + Str$(@RectangularPrismSurfaceArea(2, 3, 4)) + " cm2" Print "L'air d'une surface de prisme rectangulaire de 1x3x7 est " + Str$(@RectangularPrismSurfaceArea(1, 3, 7)) + " cm2" Function RectangularPrismSurfaceArea (h, w, l)   Return (2 * h * w) + (2 * h * l) + (2 * l * w) EndFunc

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