Hola
He pensado en lo siguiente, pero no sé si está bien:
Sea \( N_{p}=\{x\in B\;:\;px=0\} \). Como \( N_{p}\subseteq{}B \), entonces \( Ann(B)\subseteq{}Ann(N_{p}) \). Ahora lo que me faltaría probar es que \( Ann(N_p)=\langle p \rangle \), pero claramente \( \langle p \rangle \subseteq{}Ann(N_p) \). Como \( R \) es DIP, entonces, \( Ann(N_p)=\langle a \rangle \), luego \( a|p \), es decir, \( a=1 \) ó \( a=p \), pero \( a\neq 1 \), pues en caso contrario \( Ann(N_p)=R \) lo cual implicaria que \( N_p=\{0\} \). Por lo tanto \( a=p \).
espero sus comentario
Saludos