设计一个fortran程序，用泰勒公式计算cosx的值，精确到1e-7。