Cómo resolver acertijos matemáticos ABCD-CDC=ABC en programación VB
Hablemos primero de teoría. Para usar programas para resolver este tipo de problemas, no es necesario calcular ni escribir ecuaciones como las matemáticas.
Generalmente usamos las ideas más simples.
p>Significa poner los números uno por uno y luego usar el programa para juzgar (esto se llama método exhaustivo en matemáticas)
En cuanto al código, ambos son Muy bien. Si no lo entiendes, puedes consultar mi artículo
ABCD-CDC=ABC
En primer lugar, veamos esta pregunta. 4 variables, de las cuales A y C no deben ser 0, por lo que el código puede ser:
Dim a As Integer, b As Integer, c As Integer, d As Integer
Dim ABCD como entero, CDC como entero, ABC como entero
Para a = 1 a 9
Para b = 0 a 9
Para c = 1 a 9
Para d = 0 A 9
ABCD = (a * 1000 b * 100 c * 10 d)
CDC = (c * 100 d * 10 c)
ABC = (a * 100 b * 10 c)
Si ABCD - CDC = ABC Entonces MsgBox ABCD "-" amp CDC "=" amp; ; ABC
Siguiente
Siguiente
Siguiente
Siguiente
El funcionamiento real de este código no es diferente del anterior (puede ser más complicado, pero puede que le resulte más fácil de entender)
El propósito es enumerar exhaustivamente todas las posibilidades de ABCD y luego aplicar el juicio comparativo una y otra vez