Amusant pour certain, calculer l'aire d'une surface de prisme rectangulaire. Vous trouverez la réponse que vous souhaitez, à l'aide du code source RemObjects Chrome suivant:
NameSpace Rect;
INTERFACE
Uses
System.Text;
type
Prog = class
class method RectangularPrismSurfaceArea(h,w,l:Real):Real;
class method Main(Args: array of String);
end;
IMPLEMENTATION
class method Prog.Main(Args: array of String);
begin
Console.WriteLine('L''air d''une surface de prisme rectangulaire de 10x5x5 est '+Convert.ToString(RectangularPrismSurfaceArea(10, 5, 5))+'cm2');
Console.WriteLine('L''air d''une surface de prisme rectangulaire de 2x3x4 est '+Convert.ToString(RectangularPrismSurfaceArea(2, 3, 4))+'cm2');
Console.WriteLine('L''air d''une surface de prisme rectangulaire de 1x3x7 est '+Convert.ToString(RectangularPrismSurfaceArea(1, 3, 7))+'cm2');
end;
class method Prog.RectangularPrismSurfaceArea(h,w,l:Real):Real;Begin
Result:=(2 * h * w) + (2 * h * l) + (2 * l * w);
End;
END.
on obtiendra le résultat suivant :
L'aire d'une surface de prisme rectangulaire de 10x5x5 est 250cm2L'aire d'une surface de prisme rectangulaire de 2x3x4 est 52cm2
L'aire d'une surface de prisme rectangulaire de 1x3x7 est 62cm2
Dernière mise à jour : Dimanche, le 17 février 2008