Міністерство освіти і науки України Національний технічний університет України «Київський політехнічний інститут» Радіотехнічний факультет Кафедра радіоконструювання та виробництва радіо апаратури
Лабораторна робота №1
Пошук екстремуму функції за методом порозрядного наближення
Роботу прийняла: Роботу виконали: Роботу прийняла: Студенти гр.. РВ-91,
Тимофеєва Ю.Ф. IV курс, РТФ Іщенко Костянтин
Кальнюк Василь
Київ 2013р
Налагоджена програма:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include <tchar.h>
//---------------------------------------------------------------------------
#pragma argsused
#include <stdio.h>
#include <conio.h>
#include <math.h>
#include <fstream.h>
int ko,f3=1;
double h,x,f,g,e;
double q,f4=4,f1=-1.174138078551160l; double Func(double x){ ko++; return 2*pow(x,2)-exp(x) ;}
//double q,f4=5,f1=-24.369601567355000; double Func(double X){ ko++; return pow(x,4)-14*pow(x,3)+60*pow(x,2)-70*x;}
//double q,f4=6,f1=-0.5 ; double Func(double X){ ko++; return -x/(x*x+1) ;}
//double q,f4=7,f1=-0.148148148148148 ; double Func(double X){ ko++; return -x*(x-1)*(x-1) ;}
void main()
{ clrscr();
printf("Poisk metodom Porozr utochnenija\n");
ko=0;
e=pow(10,-2);
h=0.11; printf("\n h=%f", h);
x=0; f=Func(x);
printf("\n F%2d(%7.4f)=%7.4f", ko, x, f);
while (fabs(h)>=e)
{ g=f;
x=x+h; f=Func(x);
printf("\n F%2d(%7.4f)=%7.6f", ko, x, f);
if(f>g)
{ h=-h/10;
printf("\n h=%f", h);
}
}
h=h*10; x=x+h;
printf("\nko=%i Fm(%f+-%f)=%12.9f\n",ko,x,fabs(h), g);
q=-log10(fabs(g-f1));
printf("\nko=%i q=%2.9f\n",ko,q);
getch();
}
Рис.1
Рис.2
Рис.3
Початок
х=0
x0=x x=x0+h
f(x0)<f(x)
h=-h/10
|h|>ε
Кінець
Так
Так
Ні
Ні
Міністерство освіти і науки України Національний технічний університет України «Київський політехнічний інститут» Радіотехнічний факультет Кафедра радіоконструювання та виробництва радіо апаратури
Лабораторна робота №2
ПОШУК ЕКСТРЕМУМУ ФУНКЦІЇ ЗА МЕТОДОМ ФИБОНАЧІ
Роботу прийняла: Роботу виконали: Роботу прийняла: Студенти гр.. РВ-91,
Тимофеєва Ю.Ф. IV курс, РТФ Іщенко Костянтин
Кальнюк Василь
Київ 2013р
Налаголжена програма:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include <tchar.h>
//---------------------------------------------------------------------------
#pragma argsused
#include <stdio.h>
#include <conio.h>
#include <math.h>
#include <fstream.h>
int k, m, ko;
double a, b, c, d, fa, fb, fc, fd, eps;
//double Func(double X) { ko++; return pow(X-15,2);}
double q,f4=4,f1=-1.174138078551160l; double Func(double x){ ko++; return 2*pow(x,2)-exp(x) ;}
//double q,f4=5,f1=-24.369601567355000; double Func(double x){ ko++; return pow(x,4)-14*pow(x,3)+60*pow(x,2)-70*x;}
//double q,f4=6,f1=-0.5 ; double Func(double x){ ko++; return -x/(x*x+1) ;}
//double q,f4=7,f1=-0.148148148148148 ; double Func(double x){ ko++; return -x*(x-1)*(x-1) ;}