CAPTURAR 10 NUMEROS, MULTIPLOS DE 5

Varíales
Numero=0;
Cont.=0;
Imprimir (“digite numero”);
Leer (numero);
SI (numero mod 5=0); entonces;
Mientras (Cant<10) haga;
Leer (numero)
Cont ++
Fin mientras,
Fin