Купить Matlab  |  Mathematica  |  Mathcad  |  Maple  |  Statistica  |  Другие пакеты Поиск по сайту
Internet-класс  |  Примеры  |  Методики  |  Форум  |  Download
https://hub.exponenta.ru/


Примеры вычислений

В начало книги

 

Предметный указатель

Решение уравнений и неравенств. Корни многочленов
К предыдущему разделуК следующему разделу

При помощи функции randpoly создадим полином 40-ой степени со случайными коэффициентами (коэффициенты - целые случайные числа в интервале -100..100):

> restart;poly1:=randpoly([x], degree = 40);

[Maple Math]

Найдем корни полинома командой solve:

> S:=solve(poly1,x);

[Maple Math]

В общем случае явных решений в виде радикалов для корней полиномов степени выше четвертой не существует. В этом случае дается неявное решение в виде RootOf (poly). В некоторых случаях Maple может найти явное решение для корней, однако выводит на дисплей неявное решение в виде тех же RootOf . Чтобы инициировать вывод явных решений можно либо:

1. присвоить переменной операционной среды _EnvExplicit значение true;

2. конвертировать выражения содержащие RootOf в радикалы командой convert (expr, radical).

Чтобы получить приближенное значение всех корней в Maple используется команда allvalues , раскрывающая структуру RootOf :

> Sapr:=[S[1],S[2],S[3],allvalues(S[4])];

[Maple Math] [Maple Math]
[Maple Math] [Maple Math] [Maple Math] [Maple Math] [Maple Math] [Maple Math] [Maple Math] [Maple Math] [Maple Math] [Maple Math]

Теперь построим на комплексной плоскости все корни полинома (рис. 8)

> with(plots):complexplot(Sapr, x=-1.1..1.1, style=point);

[Maple Plot]

рис. 8

Итересный результат, почти все корни случайного полинома располагаются на комплексной плоскости вблизи окружности единичного радиуса с центром в начале координат.

В начало страницы К предыдущему разделуК следующему разделу

Предметный указатель

| На первую страницу | Поиск | Купить Matlab

Исправляем ошибки: Нашли опечатку? Выделите ее мышкой и нажмите Ctrl+Enter


Copyright © 1993-2024. Компания Softline. Все права защищены.

Дата последнего обновления информации на сайте: 04.03.17
Сайт начал работу 01.09.00