Минимум функции

@limee_ · Регистрация: 13.10.2017

Найти минимум функции f(x)=e^x-x^3 методом перебора с шагом 0,05 на отрезке [1,5; 4,5]
Помогите пожалуйста)

@Puporev · 16.10.2017, 17:58

Pascal

function f(x:real):real;
begin
f:=exp(x)-x*x*x;
end;
var x,y,h,min:real;
begin
h:=0.05;
x:=1.5;
min:=f(1.5);
while x<4.5+h/2 do
 begin
   if f(x)<min then min:=f(x);
  x:=x+h;
 end;
write('min=',min:0:4);
readln
end.

@limee_ 0 / 0 / 0 Регистрация: 13.10.2017 Сообщений: 13
		1
	Минимум функции 16.10.2017, 17:18. Показов 1205. Ответов 1 Метки нет (Все метки) Найти минимум функции f(x)=e^x-x^3 методом перебора с шагом 0,05 на отрезке [1,5; 4,5] Помогите пожалуйста) 0

Опции темы

Минимум функции

Решение