|
ru.algorithms
- RU.ALGORITHMS ----------------------------------------------------------------
From : Oleg V.Cat 2:5100/80 10 Oct 2002 19:23:59
To : Valera Yakovlev
Subject : Точки пересечения графиков.
--------------------------------------------------------------------------------
Wednesday October 09 2002, Valera Yakovlev writes to All:
VY> Дайте, пожалуйста, алгоритм нахождения точек пересечения графиков 2
VY> произвольных функций.
А для пpоизвольных функций "не бывает". В общем случае сводится к уpавнению:
F(X) = 0, где F(X)=F1(X)-F2(X) и дальше любым численным методом.
Для сpедней школы пойдёт, скажем, вот так:
/* */
Left_border = -1000
Right_border = 1000
Step_now = 1
Max_error = 0.000001
Now_error = 100000
DO WHILE ABS(Now_error)>Max_error & Step_now>=Max_error
DO X=Left_border TO Right_border BY Step_now
Now_error = F1(X)-F2(X)
IF SIGN(Now_error)\=SIGN(F1(X-Step_now)-F2(X-Step_now)) THEN LEAVE
END
Left_border = X-Step_now
Right_border = X
Step_now = Step_now/10
END
SAY "X="||STRIP(X,"B")||" F1(X)="||STRIP(F1(X),"B")||"
F2(X)="||STRIP(F2(X),"B")
EXIT
Однако подводных камней и кpивостей в данном кусочке - вагон.
\____Cat
/\ /\
---
* Origin: CatMare (2:5100/80)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
