Проверьте задачу

[NeLIN]

Описать функцию Exp1(x, r) вещественного типа (параметры x, r — вещественные, r > 0), находящую приближенное значение функции exp(x):
exp(x) = 1 + x + x2/(2!) + x3/(3!) + … + xn/(n!) + …
(n! = 1*2*…*n). В сумме учитывать все слагаемые, большие r. С помощью Exp1 найти приближенное значение экспоненты для данного x при шести данных r.

#include<stdio.h>
#include<conio.h>
#include<math.h>

double Exp1 (double x, double r)
{ 
     double f,s,h;
     int i;
     h=1;f=1;s=1;i=1;
     while(h/f>=r)
     {
         f*=i;
         h*=x;
         s+=h/f;
         i++;
     } 
     return s;   

}
 
 int main()

 {
     double x,r1,r2,r3,r4,r5,r6;
	 puts("Vvedite x= ");
	 scanf("%lf",&x);
 	
	 puts("Vvedite 6 zna4eniy chisla r:\n");
	 scanf("%lf%lf%lf%lf%lf%lf",&r1,&r2,&r3,&r4,&r5,&r6);
     printf ("Zna4enie x(pri r=%f)=%f\n",r1,Exp1(x,r1));
      printf ("Zna4enie x(pri r=%f)=%f\n",r2,Exp1(x,r2));
       printf ("Zna4enie x(pri r=%f)=%f\n",r3,Exp1(x,r3));
        printf ("Zna4enie x(pri r=%f)=%f\n",r4,Exp1(x,r4));
         printf ("Zna4enie x(pri r=%f)=%f\n",r5,Exp1(x,r5));
          printf ("Zna4enie x(pri r=%f)=%f\n",r6,Exp1(x,r6));
         
         getch();
  	}