Численное решение алгебраических и нелинейных уравнений

@Ангина · Регистрация: 20.03.2009

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

Решить при помощи численных методов уравнение (найти действительные корни) указанным методом, составить блок-схему.

x^3+3x^2-24x+1=0 метод хорд, Ньютона;

@Puporev · 17.04.2009, 18:20

Оба решения в одной прграмме, схема во вложении. Теорию методов читайте в интернете, там куча информации.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
uses Crt;
var x,eps,a,b,x1,c:real;
function F(x:real):real;
begin
f:=x*x*x+3*x*x-24*x+1;{Ваша функция}
end;
 
function F1(x:real):real;
begin
F1:=3*x*x+6*x-24; {первая производная для Ньютона}
end;
 
function Newton(x1,e:real):real;{метод Ньютона}
var x2,b:real;
begin
x2:=x1;
repeat
b:=x2;
x2:=b-F(b)/F1(b);
until abs(x2-b)<e;
Newton:=x2;
end;
 
function Chord(a,b:real):real;{метод хорд}
 begin
   Chord:=(f(b)*a - f(a)*b)/(f(b) - f(a))
 end;
begin
clrscr;
writeln('Введите границы интервала;');
write('a=');readln(a);
write('b=');readln(b);
write('Введите начальное приближение x1=');
readln(x1);
write('Введите точность eps=');
readln(eps);
writeln('Метод Ньютона:');
writeln('X=',Newton(x1,eps):10:7);
writeln('Метод хорд:');
repeat
   c:=Chord(a,b);
   if f(a)*f(c) > 0 then a := c
   else b := c;
until abs(Chord(a, b) - c) < eps;
x := c;
writeLn('X=',Chord(a,b):10:7);
readln
end.

@Natali Chudo · 07.11.2011, 23:34

шикарная прога)

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .

@Ангина 0 / 0 / 0 Регистрация: 20.03.2009 Сообщений: 5

	Численное решение алгебраических и нелинейных уравнений 17.04.2009, 16:36. Показов 5793. Ответов 2 Метки нет (Все метки) Решить при помощи численных методов уравнение (найти действительные корни) указанным методом, составить блок-схему. x^3+3x^2-24x+1=0 метод хорд, Ньютона; 0

@Natali Chudo 0 / 0 / 0 Регистрация: 12.09.2011 Сообщений: 6
	07.11.2011, 23:34
	шикарная прога) 0

Численное решение алгебраических и нелинейных уравнений

Решение