Coseno con serie de taylor

Hola! Necesito sacar el coseno mediante la serie de taylor http://upload.wikimedia.org/math/0/a/7/0a770c87a8648596b44d02765701beda.png Mientras la diferencia entre 2 terminos seguidos sea mayor o igual a 0,0000001. Para esto he creado un subprograma que te da el factorial, pero lo que he hecho no me funciona, agradeceria cualquier ayuda! Gracias!