Tema de programación de VB: escriba un evento de clic de formulario y calcule el problema "Pollo y conejo en la misma jaula": el pollo tiene 2 patas y el conejo tiene 4 patas. Suponga que hay 100 patas y 35 cabezas en la jaula. .
Sub privado Form_Click()
Atenuar i, x, y
Para i = 0 a 35
x = i p>
y = 35 - i
Si x*2 + y*4 = 100 Entonces Imprimir Formato(x,"Hay 0 gallinas") & Formato(y,",Hay 0 Sólo conejos ")
Siguiente
Fin Sub