ВУЗ:
Составители:
Рубрика:
y
00
+ λy = 0, y(a) = 0, y
0
(b) = 0, x ∈ [a, b].
λ 6= 0
eq :=
³
d
2
dx
2
y(x)
´
+ λy(x) = 0
y(x) = C1 sin(
√
λx) + C2 cos(
√
λx)
y := x → C1 sin(
√
λx) + C2 cos(
√
λx)
eq1 := C1 sin(
√
λ˜a) + C2 cos(
√
λ˜a) = 0
eq2 := C1 cos(
√
λ
˜
b)
√
λ − C2 sin(
√
λ
˜
b)
√
λ = 0
A :=
·
sin(
√
λ˜a) cos(
√
λ˜a)
cos(
√
λ
˜
b)
√
λ −sin(
√
λ
˜
b)
√
λ
¸
∆ := −
√
λ cos(
√
λ˜a −
√
λ
˜
b)
Íàéäåì ïåðâûå òðè êîðíÿ õàðàêòåðèñòè÷åñêîãî óðàâíåíèÿ: >K:=3:mu:=array(1..K): >for i from 1 to K do >mu[i]:=fsolve(f=0,mu,mu=i*Pi..(i+1)*Pi): >print(mu[i]); >end do: 4.493409458 7.725251837 10.90412166 Ïðèìåð 2. Íàéòè ñîáñòâåííûå çíà÷åíèÿ è ñîáñòâåííûå ôóíêöèè çàäà÷è Øòóðìà-Ëèóâèëëÿ: y 00 + λy = 0, y(a) = 0, y 0 (b) = 0, x ∈ [a, b]. Ðåøåíèå. Çàäàäèì óðàâíåíèÿ ïðè λ 6= 0 >restart:eq:=diff(y(x),x,x)+lambda*y(x)=0; ³ d2 ´ eq := y(x) + λy(x) = 0 dx2 Íàõîäèì îáùåå ðåøåíèå óðàâíåíèÿ: >dsolve(eq,y(x));y:=unapply(rhs(%),x); √ √ y(x) = _C1 sin( λx) + _C2 cos( λx) √ √ y := x → _C1 sin( λx) + _C2 cos( λx) Çàäàåì ãðàíè÷íûå óñëîâèÿ: >assume(b>a): >eq1:=y(a)=0;eq2:=D[1](y)(b)=0; √ √ eq1 := _C1 sin( λã) + _C2 cos( λã) = 0 √ √ √ √ eq2 := _C1 cos( λb̃) λ − _C2 sin( λb̃) λ = 0 Ôîðìèðóåì ìàòðèöó êîýôôèöèåíòîâ è âû÷èñëÿåì åå îïðåäåëèòåëü: >with(linalg):genmatrix({eq1,eq2},{_C1,_C2});A:=det(%); >Delta:=combine(%)); · √ √ ¸ sin( √ √λã) cos(√ λã)√ A := cos( λb̃) λ − sin( λb̃) λ √ √ √ ∆ := − λ cos( λã − λb̃) 11
Страницы
- « первая
- ‹ предыдущая
- …
- 9
- 10
- 11
- 12
- 13
- …
- следующая ›
- последняя »