Компьютерная обработка информации (в пакете MathCAD). Мартьянова А.Е. - 111 стр.

UptoLike

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

Мартьянова А.Е. Компьютерная обработка информации
111
Задание начальных и граничных условий
u1 x() F
x
ES
:=
начальное смещение стержня
u2 x() 0:=
начальная скорость
U
i0,
u1 x
i
()
:=
начальные условия
U
i1,
u1 x
i
()
h_t u2 x()+:=
U
0j,
0:=
граничные условия
Уравнение в конечных разностях
r
v h_t
h_x
:=
U
i1 j1 1+,
22r
2
()
U
i1 j1,
r
2
U
i1 1+ j1,
U
i1 1 j1,
+
()
+ U
i1 j1 1,
:=
Г
р
а
ф
ическое отоб
р
ажение
р
ез
у
льтатов
р
ешения
U
x
20
1=
t
20
2.5 10
5
×=
Мартьянова А.Е. Компьютерная обработка информации                                        111

                    Задание начальных и граничных условий
                           x
         u1 ( x) := F ⋅                       начальное смещение стержня
                          E ⋅S
         u2 ( x) := 0                         начальная скорость

         Ui, 0 := u1 ( xi)
                                              начальные условия
         Ui, 1 := u1 ( xi) + h_t ⋅u2 ( x)


         U0 , j := 0                          граничные условия


                       Уравнение в конечных разностях


                v ⋅h_t
         r :=
                 h_x

                         (       )
        Ui1, j1+ 1 := 2 − 2 ⋅r ⋅Ui1 , j1 + r ⋅( Ui1+ 1 , j1 + Ui1−1 , j1) − Ui1 , j1−1
                                 2           2



                       Графическое отображение результатов решения




                                                         x20 = 1

                                                                          −5
                U                                        t20 = 2.5 × 10