Аппроксимация функций. Выбор эмпирических формул

Автор: Пользователь скрыл имя, 11 Октября 2014 в 23:06, курсовая работа

Краткое описание

Аппроксимация (от латинского "approximate" -"приближаться")- приближенное выражение каких-либо математических объектов (например, чисел или функций) через другие более простые, более удобные в пользовании или просто более известные. В научных исследованиях аппроксимация применяется для описания, анализа, обобщения и дальнейшего использования эмпирических результ.
В курсовой работе также представлены реализация расчетов апроксимации на языках программирования.

Оглавление

Введение………………………………………………..……………………..3
Глава 1. Теоретическая часть……………………….…………………….4
Глава 2. Практическая часть……………………………….………..…..18
Заключение………………………………………….………………………36
Список используемой литературы

Скачать в ZIP (607.67 Кб) Сколько стоит заказать работу?
Файлы: 1 файл

курсовая.doc

— 1.45 Мб (Скачать)

Edit9.Text:=FloatToStrF(zxh,fffixed,6,2);

Edit10.Text:=FloatToStrF(zxg,fffixed,6,2);

Edit11.Text:=FloatToStrF(delta[1],fffixed,6,2);

Edit12.Text:=FloatToStrF(delta[2],fffixed,6,2);

Edit13.Text:=FloatToStrF(delta[3],fffixed,6,2);

Edit14.Text:=FloatToStrF(delta[4],fffixed,6,2);

Edit15.Text:=FloatToStrF(delta[5],fffixed,6,2);

Edit16.Text:=FloatToStrF(delta[6],fffixed,6,2);

Edit17.Text:=FloatToStrF(delta[7],fffixed,6,2);

Edit18.Text:=FloatToStrF(delta[8],fffixed,6,2);

Edit19.Text:=FloatToStrF(delta[9],fffixed,6,2);

Edit20.Text:=FloatToStrF(deltak,fffixed,6,2);

Edit21.Text:=FloatToStrF(kvadra,fffixed,6,2);

Edit22.Text:=FloatToStrF(a,fffixed,6,2);

Edit23.Text:=FloatToStrF(b,fffixed,6,2);

Edit24.Text:=z;

Label25.Caption:=FloatToStrF(aa,fffixed,6,2)+'*a+'+FloatToStrF(bb,fffixed,6,2)+'*b='+FloatToStrF(dd1,fffixed,6,2);

Label26.Caption:=FloatToStrF(bb,fffixed,6,2)+'*a+'+FloatToStrF(cc,fffixed,6,2)+'*b='+FloatToStrF(dd2,fffixed,6,2);

for i:=1 to n do

  Series2.AddXY(x[i],zz[i]);

Edit24.Color:=RGB($FF,$B0,$90);

end;

 

procedure TForm1.N4Click(Sender: TObject);

begin

Close;

end;

procedure TForm1.N6Click(Sender: TObject);

begin

Form2.Show;

end;

 

end.

 


 


 


 



Информация о работе Аппроксимация функций. Выбор эмпирических формул