Hola, el algoritmo seria:
var X entero
var Divisor entero
var salir entero
salir=0
mientras salir=0 hacer
si X/2 = Parte entera (X/2) entonces
Divisor = X/2
Imprime por pantalla " Divisor = " , Divisor
X=Divisor
fin si
Sino (else)
salir=1
fin mientras
No lo he probado, pero creo que funcionaria. Solo te queda implementarlo en C, en pascal, en lo que desees
salu2