Си. Нужно составить программу, которая считает функцию раскладывая ее в ряд Маклорена с заданной точностью

#include "stdio.h"
#include <math.h>
#include <conio.h>
#include <locale.h>
 
int main()
{
        double s,sold,r,a,eps;
        float x;
        int n;
        setlocale(LC_ALL,"Rus");
        s=1;
        n=0;
        a=1;
        sold=0;
        printf("\nВведите х:");
            scanf("\n%f",&x);
            do {
                n++;
        r=-(x*x)/(2*n*(2*n-1));
        printf("Вы ввели:%1.3f",x);
        a=a*r;
        s=s+a;
        eps=abs(s-sold);
        sold=s;
    } while (eps > 1e-6);
            printf("\ncos(%f)=%f\n",x,s);
            printf("\n Точность=%f",1e-6);
            printf("\n Проверка :%f\n",cos(x));
            system("pause");
            return 0;
}

#include "stdio.h"
#include <math.h>
#include <conio.h>
#include <locale.h>
 
double fact(double n){
    double fac=1;
for (int i=1;i<=n;i++)
fac*=i;
return fac;
}
 
int main()
{
        setlocale(LC_ALL,"Rus");
    printf("Цикл!\n");
    double cosin(double x,double pogr);
    double chlen;
    double x=18;
    double pogr = 0.000001;
    double xn=x*x;
    double k=-1;
    double n=1;
    double summ=1;
    do {                     //цикл разложения в ряд
    chlen=(k*xn)/(fact(2*n));
    n++;
    k=-k;
    xn*=x*x;
    summ+=chlen;
     } while (fabsl(chlen)>pogr);
     printf("Summa = %f\n",summ); //пока член больше погрешности
     printf("Проверка: cos(%1.2f)=%f\n",x,cos(x));
return summ;
    return 0;
}