Ingrese un número n en VB y encuentre el número de enteros positivos en n que se pueden dividir por 5. ¿Cómo escribir un programa?

Los números que son divisibles por 5 tienen una característica. Se dividen en dos categorías. Un tipo son los números que son divisibles por 10, como por ejemplo 10, 20… el otro tipo son los números que no son divisibles por 10 pero. puede ser divisible por 5. Números, como 5, 15...

dim count1 siempre que

'la primera mirada a n dividido por 10 es igual a cuánto, por ejemplo, si n es 10, entonces 1, pero hay dos números que son divisibles por 5, 20 de la misma manera.

count1=(n\10)*2

if (n mod 10lt; 5) entonces

else

count1=count1 1

fin si

'El resultado es count1'