Форум: "Начинающим";
Текущий архив: 2006.10.01;
Скачать: [xml.tar.bz2];
Вниз
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 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.10.01;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.011 c
