clear all;
f = @(x,y)(x^2+2.*y^2+(exp(x)).*(exp(y)));%и сходная функция
gradx=@(x,y)2*x+(exp(x)).*(exp(y));
grady=@(x,y)4*y+(exp(x)).*(exp(y));
x0=1;
y0=1;
e=0.05;
alfa=1;
D=e/2;
a=-5;
b=5;
while sqrt(gradx(x0,y0)*gradx(x0,y0)+grady(x0, y0)*grady(x0,y0))>e
g=@(alfa)f(x0-(alfa*gradx(x0,y0)),y0-(alfa*grady(x0,y0)));
min_alfa=dihot(a,b,e,D,g);
alfa=min_alfa;
x0=x0-(alfa*gradx(x0,y0));...

clear all;
f = @(x,y)(x^2+2.*y^2+(exp(x)).*(exp(y)));%и сходная функция
gradx=@(x,y)2*x+(exp(x)).*(exp(y));
grady=@(x,y)4*y+(exp(x)).*(exp(y));
x0=1;
y0=1;
e=0.05;
p=1;
alfa=1;
a=-5;
b=5;
D=e/2;
p=1;
beta=1;
while sqrt(gradx(x0,y0)*gradx(x0,y0)+grady(x0, y0)*grady(x0,y0))<100
if rem(p,2)==1
dx=-gradx(x0,y0);
dy=-grady(x0,y0);
g=@(alfa)f(x0+(alfa*dx),y0+alfa*dy);...

clear all;
f = @(x,y)(x^2+2.*y^2+(exp(x)).*(exp(y)));
gradx=@(x,y)2*x+(exp(x)).*(exp(y));
grady=@(x,y)4*y+(exp(x)).*(exp(y));
x1=1;
y1=1;
x0=1;
y0=1;
e=0.05;
alfa=1;
D=e/2;
a=-5;
b=5;
p=2;
while p>0
g=@(alfa)f(x1-(alfa*gradx(x1,y1)),y1-(alfa*grady(x1,y1)));
min_alfa=dihot(a,b,e,D,g);
alfa=min_alfa;
x1=x1-(alfa*gradx(x1,y1));
y1=y1-(alfa*grady(x1,y1));...

clear all;
f = @(x,y)(x^2+2.*y^2+(exp(x)).*(exp(y)));
gradx=@(x,y)2*x+(exp(x)).*(exp(y));
grady=@(x,y)4*y+(exp(x)).*(exp(y));
k=10;
alfa=1/k;
x0=1;
y0=1;
e=0.05;
while sqrt(gradx(x0,y0)*gradx(x0,y0)+grady(x0, y0)*grady(x0,y0))>e
if (f(x0-(alfa*gradx(x0,y0)),y0-(alfa*grady(x0,y0)))-f(x0,y0)<=alfa*(gradx(x0,y0)*gradx(x0,y0 )+grady(x0,y0)*grady(x0,y0)))
x0=x0-(alfa*gradx(x0,y0));
y0=y0-(alfa*grady(x0,y0));...

clear all;
f = @(x,y)(x^2+2.*y^2+(exp(x)).*(exp(y)));
gradx=@(x,y)2*x+(exp(x)).*(exp(y));
grady=@(x,y)4*y+(exp(x)).*(exp(y));
alfa=1;
x0=1;
y0=1;
beta=0.5;
e=0.05;
while sqrt(gradx(x0,y0)*gradx(x0,y0)+grady(x0, y0)*grady(x0,y0))>e
if (f(x0-(alfa*gradx(x0,y0)),y0-(alfa*grady(x0,y0)))-f(x0,y0)<=-beta*alfa*(gradx(x0,y0)*gradx(x0,y0)+gra dy(x0,y0)*grady(x0,y0)))
x0=x0-(alfa*gradx(x0,y0));
y0=y0-(alfa*grady(x0,y0));...

clear all;
f = @(x,y)(x^2+2.*y^2+(exp(x)).*(exp(y)));%… ”»œƒŒ¡— ∆’ŒÀ√…—
gradx=@(x,y)2*x+(exp(x)).*(exp(y));
grady=@(x,y)4*y+(exp(x)).*(exp(y));
alfa=0.01;
x0=1;
y0=1;
e=0.05;
while sqrt(gradx(x0,y0)*gradx(x0,y0)+grady(x0, y0)*grady(x0,y0))>e
if (f(x0-(alfa*gradx(x0,y0)),y0-(alfa*grady(x0,y0)))-f(x0,y0))<0
x0=x0-(alfa*gradx(x0,y0));
y0=y0-(alfa*grady(x0,y0));
end
end
minxy...

clear all;
a=-5;
b=5;
e=0.05;
D=e/2;
x0=1;%координаты первой точки
y0=1;
f = @(x,y)(x^2+y^2+(exp(x)).*(exp(y)));%исхо дная функция
f1=@(x)f(x,y0);
x1=dihot(a,b,e,D,f1);
f2=@(y)f(x1,y);
y1=dihot(a,b,e,D,f2);
while sqrt((x1-x0)^2+(y1-y0)^2)<=100 % бесконечный цикл
x0=x1;
y0=y1;
f1=@(x)f(x,y0); %функция от одной переменной...

clear all;
x= linspace(0.5,1,10); %х принимает значения от 0.5 до 10, шаг 1
A = -1/2; %коэффициент для исходной функции
B =10;%коэффициент для исходной функции
f = @(x)(A.*(x.^2)+(B.*x).*log(x));%исходная функция
a = 0.5; %промежуток [a,b]
b = 1;
e = 0.05;%точность
dF =@(x)(-x+10*log(x)+10);
while abs(b-a)>e
...

clear all;
x = linspace(0.5,1,10); % х принимает значения от 0.5 до 1, рассматриваем 10 точек
A = -1/2;
B =10;
f = @(x)(A.*(x.^2)+(B.*x).*log(x)); % исходная формула
e = 0.05;%точность
x0=0.5; %задаем x0 , проводим в этой точке касательную к функции
dF =@(x)(-x+10*log(x)+10);
dF1=@(x)(-1+10/x);
while abs(dF(x0)) > e
...

clear all;
x = linspace(0.5,1,10); % х принимает значения от 0.5 до 1, рассматриваем 10 точек
A = -1/2;
B =10;
f = @(x)(A.*(x.^2)+(B.*x).*log(x)); % исходная формула
plot(x,f(x));
a = 0.5; %промежуток [a,b]
b = 1; %промежуток
e = 0.05; %точность
dF =@(x)(-x+10*log(x)+10);
c=(dF(a)*a-f(a)+f(b)-dF(b)*b)/(dF(a)-dF(b));
while (abs(dF(c))>e...

clear all;
A = -1/2;
B =10;
x = linspace(0.5,1,10); % х принимает значения от 0.5 до 1, рассматриваем 10 точек
f = @(x)(A.*(x.^2)+(B.*x).*log(x)); % исходная формула
plot(x,f(x)); % строим график
a = 0.5; % промежуток [a,b]
b = 1;
e = 0.05; %точность
D = e/2;
while abs(b-a) > 2*e
x1=a+(b-a)*((3-sqrt(5))/2);
x2=a+(b-a)*((sqrt(5)-1)/2);...

clear all;
x = linspace(0.5,1,10); % х принимает значения от 0.5 до 1, рассматриваем 10 точек
A = -1/2;
B =10;
f = @(x)(A.*(x.^2)+(B.*x).*log(x)); % исходная формула
plot(x,f(x)); % строим график
a = 0.5; % промежуток [a,b]
b = 1;
e = 0.05; %точность
D = e/2;
while abs(b-a) > 2*e % на каждой итерации получаем отрезок,...

clear all;
% метод пассивного поиска
x = linspace(0.5,1,10); % х принимает значения от 0.5 до 1, рассматриваем 10 точек
A = -1/2;
B =10;
f = @(x)(A.*(x.^2)+(B.*x).*log(x)); % исходная формула
a = 0.5; % промежуток [a,b]
b = 1;
e = 0.05; %точность
n=10; %разбиваем промежуток на n равных частей
y(1:10)=0;...