Red de conocimiento informático - Consumibles informáticos - El problema de las gallinas y los conejos en la misma jaula se resuelve usando la programación Vb. Hay 100 cabezas en la parte superior y 300 pies en la parte inferior. Para preguntar cuántas gallinas y conejos hay, debes usar for.

El problema de las gallinas y los conejos en la misma jaula se resuelve usando la programación Vb. Hay 100 cabezas en la parte superior y 300 pies en la parte inferior. Para preguntar cuántas gallinas y conejos hay, debes usar for.

Private Sub Command1_Click()

'Problema del pollo y el conejo en la misma jaula

Dim Cock As Integer

Dim Rab As Integer

Para Polla = 0 A 100

Rab = 100 - Polla

Si Polla * 2 + Rab * 4 = 300 Entonces 'El pollo tiene 2 patas, el conejo tiene 4 patas

Imprimir "Entre ellas gallinas" & Gallo & "Sólo, conejos" & Rab & "Sólo"

Fin Si

Siguiente

Fin del subtítulo