Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

Информатика_1 / Новый текстовый документ

.txt
Скачиваний:
12
Добавлен:
09.06.2015
Размер:
496 б
Скачать
#include <conio.h>
#include <stdio.h>
#include <stdlib.h>
#include <math.h>

#define pi 3.14
void main()
{
double Sk,S,Psk,eps,a1,i,l,a2;
int n;
double m=0;
n=1;
Psk=0;
a2=1;
a1=1;
Sk=1;
printf("eps");
scanf("%lf",&eps);
printf("m ");
if (scanf("%lf",&m)!=1)
{
printf("Oshibka vvoda");
getch();
return;
}

while (Sk>eps)
{
a2=a2*(2*n-1);
a1=a1*2*n;
l=a2/a1;

Sk=pow(l,2) * pow(m,n);

Psk=Psk+Sk;

n++;

}
S=pi/2*(1+Psk);

printf("%.10lf",S);
_getch();
}
Соседние файлы в папке Информатика_1