Решить нелинейное уравнение

Sistemshik · 24.11.2010, 22:26

Процедура нахождения отрезка, на котором нелинейное уравнение вида F (x) = 0 имеет единственный корень, базируется на следующей свойства:
*** Если функция F (x) непрерывна на де любом отрезке и монотонная, на концах этого отрезка имеет противоположные знаки, то на этом отрезке нелинейное уравнение F (x) = 0 имеет единственный корень
Решить нелинейное уравнение с точностью  = 10-4

Vladimir_S · 24.11.2010, 22:58

Цитата:

Сообщение от Sistemshik

Процедура нахождения отрезка, на котором нелинейное уравнение вида F (x) = 0 имеет единственный корень, базируется на следующей свойства:
*** Если функция F (x) непрерывна на де любом отрезке и монотонная, на концах этого отрезка имеет противоположные знаки, то на этом отрезке нелинейное уравнение F (x) = 0 имеет единственный корень
Решить нелинейное уравнение с точностью  = 10-4

Пожалуйста. Только есть одно "но". Дело в том, что преподы обожают и, соответственно, как правило, требуют от студентов для решения подобных задачек использовать метод половинного деления. Я же, на свой вкус, всегда применяю метод десятичного деления. Если устроит, то вот:

Код:

CONST
 Xbeg=1.7;
VAR
 X,DX:REAL;
 i:INTEGER;

Function F(Xf:Real):Real;
 begin
  F:=Xf*Xf-Ln(1+Xf)-3;
 end;

BEGIN
 DX:=1;
 X:=Xbeg;
 For i:=1 to 4 do
  begin
   DX:=DX/10;
   Repeat
    X:=X+DX;
   Until F(X)>0;
   X:=X-DX;
  end;
 WriteLn('X= ',X:7:5);
 ReadLn;
END.

24.11.2010, 22:26	#1 (permalink)
Sistemshik Новичок Регистрация: 19.11.2010 Сообщений: 5 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Решить нелинейное уравнение Процедура нахождения отрезка, на котором нелинейное уравнение вида F (x) = 0 имеет единственный корень, базируется на следующей свойства: * Если функция F (x) непрерывна на де любом отрезке и монотонная, на концах этого отрезка имеет противоположные знаки, то на этом отрезке нелинейное уравнение F (x) = 0 имеет единственный корень Решить нелинейное уравнение с точностью  = 10-4** Миниатюры

24.11.2010, 22:26
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	По содержанию ваш топик аналогичен данным темам Решить дифференциальное уравнение в Паскале Решить задачки Решить уравнение линейной алгебры Помогите решить Помогите решить.

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070