Найти минимум функции, используя цикл с параметром

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

Студворк — интернет-сервис помощи студентам

Найти минимум функции с помощью цикла с параметром f(x)=e^x-x^3 методом перебора с шагом 0.05 на отрезке [1.5, 4.5].

@Puporev · 21.10.2017, 13:57

Pascal

uses crt;
function f(x:real):real;
begin
f:=exp(x)-exp(ln(x)*3);
end;
var n,i:integer;
    a,b,h,mn:real;
begin
clrscr;
a:=1.5;
b:=4.5;
h:=0.05;
n:=round((b-a)/h);
for i:=0 to n do
if i=0 then mn:=f(a)
else if f(a+i*h)<mn then mn:=f(a+i*h);
write('min f(x)=',mn:0:3);
readln
end.

@limee_ 0 / 0 / 0 Регистрация: 13.10.2017 Сообщений: 13
		1
	Найти минимум функции, используя цикл с параметром 20.10.2017, 19:25. Показов 1096. Ответов 1 Метки нет (Все метки) Найти минимум функции с помощью цикла с параметром f(x)=e^x-x^3 методом перебора с шагом 0.05 на отрезке [1.5, 4.5]. 0

Опции темы

Найти минимум функции, используя цикл с параметром

Решение