Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Скачиваний:
12
Добавлен:
09.06.2015
Размер:
430 б
Скачать
#include "conio.h"
#include "stdio.h"
#include "math.h"
void main()
{
double z,y,eps,p,q,sum;
int k=1,i=0,s=1,n=1;

printf("eps ");
scanf("%lf",&eps);
printf("z ");
if (scanf("%lf",&z)!=1)
{
printf("FAIL");
getch();
return;
}
while(fabs(y)>eps)
{
	q=pow((z/2),2);
	p=pow((pow((-z),2)/4),k);
	n=k;
	n=n*(i+1);
	s=k+2;
	s=s*(i+1);
	y=(q*(p/(n*s)));
		i++;
}
sum=y;
printf("summ=%lf",sum);
getch();
}
Соседние файлы в папке Информатика_1