Programación VB: preguntas de cálculo matemático

Macho y hembra son pequeños

4 18 78

8 11 81

12 4 84

- -- ---------------Código----------------------

Sub prueba( )

Atenuar i, j, l como entero

Para i = 1 a 20

Para j = 1 a 20

Para l = 1 a 300

Si 5 * i 3 * j 1 / 3 * l = 100 y i j l = 100 Entonces MsgBox i amp; p>Siguiente l

Siguiente j

Siguiente i

Fin Sub