Red de conocimiento informático - Problemas con los teléfonos móviles - Programación V Encuentra el número de números entre 200 y 400 que son divisibles por 3 pero no divisibles por 7.

Programación V Encuentra el número de números entre 200 y 400 que son divisibles por 3 pero no divisibles por 7.

Subcomando privado1_Click()

Atenuar c mientras

Para b = 200 a 400

Si InStr(1, b / 3, ".") = 0 And InStr(1, b / 7, ".") lt 0 Entonces

c = c 1

End If

Siguiente

MsgBox "El número de números entre 200 y 400 que son divisibles por 3 pero no divisibles por 7 es" amp c amp ""

End Sub;