Algoritmia - ¡Ayuda con esto!

Hola:

Creo que es algo muy simple, pero me he bloqueado y quería algo de ayuda (si me podéis explicar un poco por aquí).

Dado este algoritmo:

Algoritmo calcular

var
numero: entero;
resultado: entero;
fvar

numero := 45897;
resultado := 0;

mientras numero > 0 hacer
si (numero mod 2) = 0 entonces
resultado := resultado + 1;
fsi
numero := numero div 10;
fmientras

falgoritmo


Debo conocer el RESULTADO del algoritmo, pero me pierdo a partir del fsi...

Y, por otro lado, me pide indicar ¿Cuál es el enunciado del problema que debe resolver este algoritmo?.

Llevo un buen rato con ello y no lo veo.

Mil gracias.