Una de las potencialidades de las cuales disfrutas de programar en Wolfram Mathematica, es la posibilidad de, construir pequeños módulos (scripts) que te permitan hacer cálculos repetitivos y tediosos, en esta ocasión y por ociosidad haremos un pequeño script en Mathematica, que dado dos números A y B introducidos por el usuario realice la condición de suma.
Para poder realizar está operación, nos valdremos del uso de un Panel y de la condición de un modulo dinámico (DynamicModule) que, cuando el usuario digite los dos números estos, automáticamente realicen la suma.
Veamos el código de la aplicación:
Panel[DynamicModule[{resultado = valora + valorb, valora = 0,
valorb = 0},
Panel[Grid[{{"Número A:",
InputField[Dynamic[valora], FieldSize -> 3]}, {"Número B:",
InputField[Dynamic[valorb], FieldSize -> 3]}, {"Resultado:",
InputField[Dynamic[resultado], Enabled -> False,
FieldSize -> 5]}}]]]]
Está es una forma sencilla y rápida de resolver un problema en el cual la velocidad de procesamiento para un resultado eficaz, Wolfram Mathematica podrá servir.
Y este es el resultado del Script:
