Современное программное обеспечение в пользовательском процессе: Сборник заданий по курсу. Глушко А.В - 7 стр.

UptoLike

ВУЗ: 

ВГУ | Воронеж

Составители: 

Рубрика: 

y20@0D - w20
0.
<< Utilities`ShowTime`
Max@Abs@Table@x20 = Random@Real, 8-3.5, 3.5<D;
Chop@HHeq20@y20D@@1DD - f20L
ê
.xÆ x20L,1* 10^-6D, 8500<DDD
115.13 Second
2.86454 × 10
−6
Счётчик времени после использования следует выключить.
Off@ShowTimeD
Задача 3
Найти численное решение следующей начальной задач для
нелинейной системы из трёх уравнений первого порядка. Построить
график решения в фазовом пространстве с помощью команды Paramet-
ricPlot3D в подпакете <<Graphics`ParametricPlot3D`. Провести проверку
решения.
8-H2 + 0.05 Sin@tDL Hy@tD + z@tDL + x
¢
@tD == 0,
H1 - 0.06 Cos@tDL Hx@tD + z@tDL + y
¢
@tD == 0,
H1 + 0.001 t
2
L x@tD - H1 + 0.07 tL y@tD
2
+ z
¢
@tD == 0,
x@0D == 0.99, y@0D == 0.02, z@0D == -1.97<, 8t, 0, 4.15<,
MaxSteps Æ 15000, AccuracyGoal -> •, PrecisionGoal -> 17,
WorkingPrecision -> 17, Method -> RungeKutta
Начальные данные задачи имеют вид
w301 = 0.99; w302 = 0.02; w303 =-1.97;
Введём оператор
z
ad ok7bis.nb 7
zad ok7bis.nb                                                               7




    y20@0D - w20
    0.

    << Utilities`ShowTime`
    Max@Abs@Table@x20 = Random@Real, 8-3.5, 3.5 •, PrecisionGoal -> 17,
    WorkingPrecision -> 17, Method -> RungeKutta

    Начальные данные задачи имеют вид

    w301 = 0.99; w302 = 0.02; w303 = -1.97;
    Введём оператор

Страницы