
Ввод данных для Infinity:
SupT := 10
l1 := 0.01*diff(x1(t),t) - x2(t) = -x1(t)^2
l2 := x1(t) + diff(x2(t),t) = 0
analysis({l1, l2, x1(0) := 0.25, x2(0) := 0.0575}, {x1(t), x2(t)})
Решения, полученные Infinity являются точными решениями введенной
системы нелинейных ОДУ:
Ввод данных для Maple:
Digits := 50:SupT := 10;
l1 := 0.01*diff(x1(t),t) - x2(t)= -x1(t)^2;
l2 := x1(t) + diff(x2(t),t) = 0;
sol := dsolve({l1,l2,x1(0) = 0.25, x2(0) = 0.0575},{x1(t),x2(t)},
type = numeric, method=lsode);
Решения, полученные Maple:
a) method=lsode

b) method=taylorseries
Copyright © 1998-2004,
MathRevolt.
All rights reserved
|