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

UptoLike

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

Max@Table@t303 = Random@Real, Rest@g30@x, y, z[email protected]@2DDDD; Chop@
Evaluate@Abs@eq30@x30, y30, z30[email protected]@3DD
ê
.tÆ t303DD,1* 10^-8D, 8100<DD
7.94925 × 10
7
Задача 4
Найти численное решение (с повышенной точностью) следующих
начальных задач для нелинейных систем из двух уравнений первого
порядка (1£j£5). Построить графики решений в фазовой плоскости и
объединённый график. Провести проверку первой из предложенных
задач
x
¢
@tD +
1
ÄÄÄÄÄÄÄÄÄÄÄÄ
100
RoundA100
i
k
j
j
j
j
1 +
0.6
j
ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
H1 + jL
2
y
{
z
z
z
z
E y@tD +
1
ÄÄÄÄÄÄÄÄÄÄÄÄ
100
RoundA100
i
k
j
j
j
j
1 +
0.78 j
ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
H2 + jL
2
y
{
z
z
z
z
E Sin@tD
3
== 0,
y
¢
@tD +
1
ÄÄÄÄÄÄÄÄÄÄÄÄ
100
RoundA100
i
k
j
j
j
j
1 +
0.55 j
ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
H3 + jL
2
y
{
z
z
z
z
E Sin@x@tDD
2
+
1
ÄÄÄÄÄÄÄÄÄÄÄÄ
100
RoundA100
i
k
j
j
j
j
1 +
0.76 j
ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
H5 + jL
2
y
{
z
z
z
z
E x@tD
2
+
1
ÄÄÄÄÄÄÄÄÄÄÄÄ
100
RoundA100
i
k
j
j
j
j
1 +
0.72 j
ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
H4 + jL
2
y
{
z
z
z
z
E y@tD == 0,
x@0D == 0.85 - 0.0008 j RoundA100
i
k
j
j
j
j
1 +
6j
ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
H1 + jL
2
y
{
z
z
z
z
E,
y@0D == 0.03 + 0.0011 j RoundA100
i
k
j
j
j
j
1 +
0.3 j
ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
H1 + jL
2
y
{
z
z
z
z
E,
8t, -2.0 + 0.1 * j, 4.8 - 0.05 * j<, MaxSteps -> 1000 H14 + jL,
AccuracyGoal -> , PrecisionGoal Æ 15 + j, WorkingPrecision Æ 15 + j,
PlotPoints Æ 10 j + 100, Method -> RungeKutta
Введём изменяющиеся начальные условия по формулам
z
ad ok7bis.nb 12
zad ok7bis.nb                                                                           12




    Max@Table@t303 = Random@Real, Rest@g30@x, y, zD@@2DDDD; Chop@
        Evaluate@Abs@eq30@x30, y30, z30D@@3DD ê. t Æ t303DD, 1 * 10^-8D, 8100
1000 H14 + jL, AccuracyGoal -> •, PrecisionGoal Æ 15 + j, WorkingPrecision Æ 15 + j, PlotPoints Æ 10 j + 100, Method -> RungeKutta Введём изменяющиеся начальные условия по формулам