Исходник «Вычисление суммы ряда»

Задание: cos(x) + cos(3x)/3 + … + cos((2n-1)x)/(2n-1) 0.5ln(ctg(x/2)) функция вычисления суммы ряда. Для диапазона значений 0.1 .. 0.9 и шага 0.1 изменения аргумента Вычислить значения суммы ряда и контрольной функции, к которой он сходится, с точностью до 4 знаков после запятой.

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

int About(); // О программе
int main ()
{
double ctg;
double func;
About (); // О программе
double x;

char a [80]; //Шапка таблицы результатов
CharToOem («\nАргумент Сумма Шагов Контр-я функция \n», a);
printf(«%s», a);

//Вычисление суммы ряда и контрольной функции
for (x=0.1; x<=0.9; x+=0.1)
   {
   	ctg = (cos(x/2))/(sin(x/2));
      func = 0.5*(log(ctg)); 			//Вычисление контрольной функции.

		double toch=0.0001;				//Начало вычисление суммы ряда.
    	double pred;       	//Предыдущее значение суммы ряда
		double sled=0.;      //Следующее значение суммы ряда
		int n=1;
		do{
   		pred = sled;
			sled += cos((2*n-1)*x)/(2*n-1);
         n++;
   	}while (fabs(sled-pred)>=toch); //Конец вычисление суммы ряда.

printf («x = %g sum = %7.5g n = %3d 0.5ln(ctg(x/2)) = %7.5g\n», x, sled, n, func);
}

На данной странице представлены авторские программы. 
Эти лабораторные работы сдавались Новосибирского государственного технического университета по специальности 220400 "Программное обеспечение вычислительной техники и автоматизированных систем". 
Все работы написаны на языка 'Си'. Все программы проверялись на компиляторе Borland C++ 5.02