Скачать: CL | DM;

Function   Найти похожие ветки 

← →
Endi   (2006-09-13 16:36) [0]

function koren(a, b, eps:real ; function f:real):real;
var c:real;
begin
while abs(a-b)>eps
 do
  begin
   c:=(a+b)/2;
   if f(a)*f(b) =< 0
   then b:=c
   else a:=c
  end;
 koren:=(a+b)/2
end;

ne kak ne poymu cto zdes delayet f(a) i f(b), obyasnite pojalusta

---

← →
Сергей М. ©   (2006-09-13 16:40) [1]

Да нихрена оно не делает, ни здесь ни там)
Это вообще не будет скомпилировано.
Ты где этого "добра" набрал, скажи на милость ?)

---

← →
Kolan ©   (2006-09-13 16:40) [2]

Naverno eto visof kakix-to funcii...

---

← →
Ega23 ©   (2006-09-13 16:44) [3]

А что, sqrt(x) уже не катит?

---

← →
palva ©   (2006-09-13 16:47) [4]

Функция f - это та функция, корень которой (нулевое значение) ищется здесь методом пополамного деления.

---

← →
Сергей М. ©   (2006-09-13 16:49) [5]

> пополамного


В цитатник ! Непгеменно в цитатник !))

---

← →
palva ©   (2006-09-13 22:00) [6]

> Сергей М. ©   (13.09.06 16:49) [5]
>
> > пополамного
>
>
> В цитатник ! Непгеменно в цитатник !))


Ну хорошо, напополамного.

---

← →
Джо ©   (2006-09-14 03:38) [7]

> [6] palva ©   (13.09.06 22:00)
> Ну хорошо, напополамного.

Хрень редьки не слаще ;))

---

← →
ЮЮ ©   (2006-09-14 03:54) [8]

это функция половинчатого решения ибо только по форме напоминает метод половинного деления, хотя по сути им не является из-за ошибок в алгоритме

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.047 c